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PREFACE 



This manual provides general information, installation instructions, operating 
and programming information, and principles of operation for the System 80/30 
Microcomputer. Additional information is available in the following documents: 

• Intel iSBC 80/30 Single Board Computer Hardware Reference Manual, Order 
No. 9800611. 

• Intel 8080/8085 Assembly Language Programming Manual, Order No. 9800301. 

• Intel MCS-85 User's Manual, Order No. 98-366. 

• Intel iSBC 655 System Chassis Hardware Reference Manual, Order No. 9800709. 

• Intel iSBC 635 Power Supply Hardware Reference Manaul, Order No. 9800298. 

• Intel iSBC 604/614 Cardcage Hardware Reference Manual, Order No. 9800708. 
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CHAPTER 1 
GENERAL INFORMATION 



1.1 INTRODUCTION 

The Intel System 80/30 Microcomputer is a com- 
pletely packaged standalone computer for OEM ap- 
lications, consisting of an iSBC 80/30 Single Board 
Computer, an iSBC 655 Chassis with front panel and 
fans, an iSBC 604 Cardcage with Backplane, and an 
iSBC 635 Power Supply (see figure 1-1). This chapter 
provides a basic system description, a specifications 
table and a list of necessary interfacing equipment 
for the System 80/30 Microcomputer. 



1.2 SYSTEM DESCRIPTION 

The Intel System 80/30 Microcomputer is housed in 
the 3.5 inch, rack-mountable iSBC 655 System 
Chassis. The chassis has removable front and rear 
panels, the latter providing board access. Two fans 
are used for cooling, one directed toward the power 
supply and the other toward the cardcage. 



All power is furnished by an iSBC 635 modular 
power supply, mounted directly behind the front 
panel circuit board. All outputs have current limiting 
and overvoltage protection. An active high ( + 5 volt) 
output level is provided when input voltage falls 
below 90% of its nominal value. 



A modular iSBC 604 cardcage/backplane resides in 
the chassis to house the iSBC 80/30 Single Board 
Computer and provide an easily accessible bus inter- 
face. The cardcage will house three additional expan- 
sion boards. The iSBC 80/30 Single Board Computer 
consists of an Intel 8085A central processing unit, a 
programmable timer, priority interrupt logic, 
Multibus control logic, one USART controlled serial 
I/O port, three parallel I/O ports and 16K bytes of 
dynamic random access memory. Provision is made 
for installation of masked or programmable read on- 
ly memory and an Intel 8041 or 8741 Universal 
Peripheral Interface. 




Figure 1-1. System 80/30 Microcomputer 
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1.3 MONITOR PROGRAM 
DESCRIPTION 

A comprehensive system monitor (iSBC 930) residing 
in the first 2K of ROM, is included with the system to 
facilitate program loading, execution and debugging. 
Monitor commands include reading and writing hex- 
adecimal paper tapes, executing pre-defined program 
segments, executing single program instructions, 
break program execution or any of seven system con- 
ditions, (display, move and alter memory contents, 
display and alter CPU register contents, and read and 
write memory contents from or to paper tape). 
Monitor commands and resulting information may 
be initiated and displayed using a teletypewriter or 
CRT terminal. 



1.4 DOCUMENTATION SUPPLIED 

The System 80/30 Microcomputer is supplied with 
the System 80/30 Documentation Package. This 
package consists of the following publications: 

1. System 80/30 Microcomputer User's Guide, 
Order No. 9800710 

2. iSBC 80/30 Single Board Computer Hardware 
Reference Manual, Order No. 9800611 

3. iSBC 655 Chassis Hardware Reference 
Manual, Order No. 9800709 

4. iSBC 604 Cardcage Hardware Reference 
• Manual, Order No. 9800708 

5. iSBC 635 Power Supply Hardware Reference 
Manual, Order No. 9800298 

Each of the hardware reference manuals is complete 
with logic and/or wiring diagrams and replacement 
parts listings. To locate a particular diagram or parts 



listing, refer to the table of contents at the beginning 
of each manual. 

A complete listing of the Intel 8085 CPU instruction 
set is given in Appendix A of the iSBC 80/30 Hard- 
ware Reference Manual. 



1.5 STANDARD EQUIPMENT AND 
USER SUPPLIED EQUIPMENT 

The System 80/30 Microcomputer is supplied with 
the following hardware: iSBC 80/30 Single Board 
Computer chassis, front panel with switches and in- 
dicators, power supply, cardcage with backplane, 
dual fans, a 1 15 volt power cord, all 1 15 volt and 230 
volt fuses, and a RS-232-C cable (25 inch length). In 
addition, the 80/30 monitor ROM is supplied (one 
chip). 



All rack mounting hardware is user supplied. 
Chapter 2 describes procedures for mounting and 
lists recommended parts. If the chassis is optioned 
for 230 volt operation, the power cord is not sup- 
plied. Any I/O cables, with the exception of the 
RS232 cable, are also user furnished. The hardware 
reference manual for each iSBC board will provide 
a table of compatible I/O connectors recommended 
by Intel (not all boards require I/O cables, however). 



1.6 SPECIFICATIONS 

Table 1-1 lists the system level specifications for the 
System 80/30 Microcomputer. Additional data are 
listed in the Specifications section of each Hardware 
Reference Manual in the Documentation Package. 



Table 1-1. Specifications 



POWER REQUIREMENTS 
Frequency: 
Voltage: 

Current: 

ENVIRONMENTAL REQUIREMENTS 
Operating Temperature: 
Relative Humidity: 



47-63 Hz 

Standard: 115 Vac ±10% 
Optional: 230 Vac ±10% 
270 Watts maximum 



0°to50 o C(32°tOl22°F) 
To 90% non-condensing 



PHYSICAL CHARACTERISTICS 




Height: 


8.90 cm (3.5 in.) 


Width: 


At Front Panel: 48.3 cm (19 in.) 




Behind Front Panel: 43.2 cm (17 in.) 


Depth: 


50.8 cm (20 in. with all protrusions) 


Weight: 


16.6 Kg (37 lb) 
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CHAPTER 2 
PREPARATION FOR USE 



2.1 INTRODUCTION 

This chapter provides instructions for unpacking, in- 
stallation and initial setup of the System 80/30 
microcomputer. Peripheral interfacing information 
is located in Chapter 2 of the iSBC 80/30 Hardware 
Reference Manual. Ideally, the System 80/30 user 
should be familiar with the entire iSBC 80/30 Hard- 
ware Reference Manual and this manual before at- 
tempting operation. 



2.2 UNPACKING AND INSPECTION 

Inspect the shipping carton immediately upon receipt 
for evidence of mishandling during transit. If the 
shipping carton is severely damaged or waterstained, 
request that the carrier's agent be present when the 
carton is opened. If the carrier's agent is not present 
when the carton is opened and the contents of the 
carton are damaged, keep the carton and packing 
material for the agent's inspection. 

For repairs to a product damaged in shipment con- 
tact the Intel Technical Support Center to obtain a 
Return Authorization Number and further instruc- 
tions. A purchase order should be submitted to the 
carrier with your claim. Instruction for contacting 
the Intel Technical Support Center are given in 
chapter 5 of the iSBC 80/30 Hardware Reference 
Manual. 

It is suggested that salvageable shipping cartons and 
packing material be saved for future use in the event 
the product must be reshipped. 



The total amount of power available from the iSBC 
635 Power Supply is listed at the top of Table 2-1. 
Since the iSBC 80/30 Single Board Computer power 
requirements vary by configuration, the amount of 
power available for expansion boards will also vary. 
Table 2-1 outlines the power available for expansion 
boards in the System 80/30 Microcomputer chassis. 
Notice that certain options require only one voltage 
for operation, and therefore do not affect the output 
power available from the other voltages. For 
example, if the iSBC 530 Teletypewriter Adapter is 
used with the standard iSBC 80/30 Board configura- 
tion, the only power supply voltage affected is the -12 
volt output. Power consumption for the iSBC 80/30 
Board is listed in the iSBC 80/30 Single Board 
Computer Hardware Reference Manual, Order No. 
9800611. 



2.5 COOLING 

Without expansion boards, the system dissipates 
4.0 kilogram calories of heat. Adequate cooling 
(<50°C) for the basic system and three expansion 
boards is provided by the two chassis fans. Care 
should be exercised during installation, to prevent 
obstructing chassis air flow openings. 



2.6 RACK MOUNTING 

The System is designed for installation in standard 
19" RETMA racks using Chassis-Trak C-300-D-122 
Pivot Slides with alternate T-bar handles, or 
equivalent. 



2.3 INSTALLATION 
CONSIDERATIONS 

The System 80/30 chassis is designed for 19-inch 
RETMA rack mounting. Figure 2-1 illustrates all 
relevant outline dimensions. Before chassis installa- 
tion, the user should be familiar with paragraphs 
2-4 through 2-8. 



2.4 POWER REQUIREMENTS 

Maximum AC power requirements for the System 
80/30 are listed in the Specifications section (Table 
1-1) of Chapter 1. 




CAUTION 



When using slides other than Chassis-Trak 
C-300-D-122, the maximum slide width is 
1.7 inches. Failure to comply may result in 
damage to the System. 

To mount Chassis-Trak slides on the System chassis 
proceed as follows: 

1 . Remove and reinstall the front fan using four 1/4 
x 7/16 inch spacers under the fan. (Spacers used 
should be Amatom Electronic Hardware, Part 
No. 9227-A140 or equivalent.) 

2. Mount the slides on the chassis using mounting 
hardware supplied with the slide. 
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Figure 2-1. System 80/30 Outline Dimensions (Inches) 
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When using slides other than Chassis-Track drill 
holes acording to the manufacturer's instruc- 

10ns ' I ■»■* »¥ < WMM» | 

f CAUTION 1 

When drilling new holes, ensure all metal 
filings and chips are removed from the in- 
terior of the chassis before turn-on. 
Failure to comply may result in damage to 
the system. 

After the System has been mounted in the 
cabinet, secure it in the cabinet with two No. 
10-32 round head machine screws. 



2.7 OPTIONAL COMPONENTS 

Because the System is designed to satisfy a variety of 
applications, the user must purchase and install only 
those components required to satisfy his particular 
needs. 

Instructions for installing optional ROM or an Intel 
Universal Peripheral Interface circuit are given in 
the iSBC 80/30 Hardware Reference Manual. 



The system is shipped with an RS232C Serial I/O 
Cable Assembly, Part No. 4000677 that mates with 
most CRT terminals. For other applications, and for 
parallel I/O interfacing, cabling is user furnished. 
Refer to the iSBC 80/30 Hardware Reference Manual 
for connector information. 



2.8 INITIAL SETUP 



Once the System Microcomputer has been unpacked 
and inspected, the following steps should be checked 
or performed, as indicated: 

1. Remove rear and top cover panels. 

2. Inspect all internal power connectors to ensure 
they have not loosened during shipment. 

3. Verify setting on input voltage selection switch. 
Verify that corresponding fuse is installed in fuse 
holder Fl. 

4. Remove the two metal circuit board retainers 
from either side of the cardcage. 

5. Unpack the iSBC 80/30. Unpack the iSBC 930 
monitor. 



Table 2-1 . Output Power Available for Expansion Boards 



Voltages: 


+ 5 


+ 12 


-5 


-12 


Maximum Current: 


14.0 A 


2.0A 


0.9A 


0.8A 


iSBC 80/30 Board Configuration 
Standard Board ' 
With 8041/8741A 2 
With iSBC 530 3 

With 2K bytes EPROM (using 8708) ' 
With 2K bytes EPROM (using 2758) * 
With 4K bytes EPROM (using 2716) " 
With 8K bytes ROM (using 2332) " 

Over-voltage protection 


10.5A 

10.4A 

10.5A 

9.6A 

9.4A 

9.4A 

9.4A 

+ 5.8 

to 

+ 6.6V 


1.7A 

1.7A 

1.6A 

1.6A 

1.7A 

1.7A 

1.7A 

+ 14 

to 

+ 16V 


0.9A 

0.9A 

0.9A 

0.8A 

0.9A 

0.9A 

0.9A 

-5.8 

to 

-6.6V 


0.7A 

0.7A 

0.6A 

0.7A 

0.7A 

0.7A 

0.7A 

-14 

to 

-16V 


NOTES: 

1. Does not include optional EPROM/ROM, 8041/8741 A, I/O drivers, or I/O terminators. 

2. Does not include optional EPROM/ROM, I/O drivers, or I/O terminators. 

3. Does not include optional EPROM/ROM, 8041/8741 A, I/O drivers, or I/O terminators. Power for iSBC 530 
is supplied through the serial port connector. 

4. Includes two EPROM/ROM chips, 8041/8741A, and 220Q/330Q input terminators installed for 34 I/O (all 
terminator inputs low). 
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6. Carefully install the 930 Monitor ROM into the 
A25 socket of the iSBC 80/30. Ensure that pin 1 
of the ROM (notched side) corresponds to the 
white dot to the left of the socket (figure 2-2). 



I CAUTION I 



All MOS devices such as the ROM 
monitor are extremely sensitive to tran- 
sient voltages, especially static electricity 
discharges. Caution should be exercised in 
low humidity environments during device 
installation, to prevent static discharge. 
Always ground yourself before handling 
MOS devices to ensure any static charge 
which may have accumulated is discharg- 
ed. After picking up the device, do not 
walk on carpeted floors; install the device 
immediately following the grounding. 



1 1 . Replace top and rear panel covers. 

12. Install power cord into line filter socket on rear 
panel. 

The System 80/30 is now ready for operator interac- 
tion, via the CRT terminal or teletypewriter. 
However, the user should be familiar with the 
operating procedures and monitor functions describ- 
ed in Chapter 3 before attempting operation. 



2.9 OPTIONAL TTY 

INTERFACE MODULE 

The optional TTY interface module (iSBC 530 
Teletypewriter Adapter) converts iSBC 80/30 
RS232-C signal levels to an optically isolated 20 mA 
current loop interface and provides signal translation 
for transmitted data, received data and a 
teletypewriter paper tape reader relay. Installation of 
the iSBC 530 is discussed in Appendix B of the iSBC 
80/30 Hardware Reference Manual. 



NOTCH 
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Figure 2-2. Monitor ROM Socket 



Install any other optional components; refer to 
Chapter 2 of the iSBC 80/30 Hardware 
Reference Manual. 

7. Perform any jumper modifications, if necessary. 
Refer to Chapter 2 of the iSBC 80/30 Hardware 
Reference Manual. 

8. Install all I/O connectors and strain relief 
clamps. If interfacing to a teletypewriter, refer to 
Appendix B in the iSBC 80/30 Hardware 
Reference Manual. 

9. Carefully install the computer board into 
cardcage slot J5 (bottom slot). Component side 
of the board should be facing up. 

10. Install any optional boards in the remaining 
slots, as described in step 9. 



2.10 MEMORY PROTECT 
CONFIGURATION 

The memory protect configuration is designed to halt 
the CPU and preserve RAM contents during a power 
failure. This is accomplished by the use of a power 
fail signal and backup batteries. All signals enter the 
iSBC 80/30 board through the auxiliary P2 connec- 
tor. To implement the memory protect configura- 
tion, the following modifications must be performed: 

a. Connect auxiliary signal common and returns for 
+ 5V, -5V, and +12V backup batteries to P2 
pins 1 and 2. 

b. Connect + 5V battery input to P2 pins 3 and 4; 
-5V battery input to P2 pins 7 and 8 and + 12V 
battery input to P2 pins 1 1 and 12. 

c. Remove jumpers W7, W8, and W9 (iSBC 
80/30). 

d. Connect PFS/ input to P2 pin 17, and MEM 
PROT/ input to P2 pin 20. 

e. Connect PFI/ input to P2 pin 19; this signal is 
inverted and supplied to the priority interrupt 
matrix. To assign the PFI/ input as the highest 
priority interrupt (8085A TRAP), remove 
jumper 137-145 and connect jumper 134-137. 

The DC characteristics for these auxiliary signals are 
listed in table 2-18 of the iSBC 80/30 Hardware 
Reference Manual. 
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CHAPTER 3 
OPERATING INFORMATION 



3.1 INTRODUCTION 

This chapter provides operating information for the 
System 80/30. An operational description of the 
chassis switches and indicators is given, followed by 
an introduction to the System 80/30 monitor pro- 
gram (iSBC 930). The bulk of this chapter is devoted 
to describing the features of the monitor program. 
Users should be familiar with all information 
presented in this chapter before attempting opera- 
tion. 



3.2 FRONT PANEL SWITCHES AND 
INDICATORS 

The following switches and indicators are mounted 
on the System 80/30 front panel: a power ON/OFF 
indicator-switch; a momentary INTERRUPT switch; 
a momentary RESET switch; a RUN indicator; and a 
HALT indicator. The function performed by each 
switch and indicator is described in the following 
paragraphs. 

Power ON/OFF indicator-switch: in the latched 
position (pushbutton toward chassis) AC power is 
ON and the indicator lamp will illuminate. In the 
unlatched position, power is OFF. Latching and 
unlatching is accomplished by pushbutton depres- 
sion. 

INTERRUPT switch: activating this momentary 
switch issues an interrupt request signal to the 8259 
Interrupt Controller (A30) on the iSBC 80/30. The 
switch is wired to pin 42 of the Multibus which cor- 
responds to interrupt request level INT1/. Normally 
this line would be jumpered to the IRl/ input on the 
controller. Paragraph 3-25 describes interrupt hand- 
ling by the monitor. 

RESET switch: activating this momentary switch 
causes the system to execute the reset routine at loca- 
tion 0000 in the monitor ROM. Paragraph 3-23 
describes this routine. 

RUN indicator: this indicator is on when the CPU is 
executing an instruction. The indicator will be off 
when the CPU is in the WAIT state or a HALT in- 
struction has been executed. 

HALT indicator: this indicator is on after the CPU 
has executed a HALT instruction. Only a front panel 
RESET or an interrupt will remove the HALT state. 



Notice that when the CPU is in the WAIT state 
neither the RUN nor the HALT indicators are on. 
However, the WAIT state will be terminated by the 
failsafe timer timeout (approximately 10 ms). 



3.3 SYSTEM 80/30 MONITOR 
PROGRAM (iSBC 930) 

System operation is facilitated through the use of the 
monitor program. The monitor is an Intel 8085 CPU 
program provided in one ROM device, occupying ad- 
dress space 0000 through 07FF. In addition to pro- 
viding various housekeeping routines such as the 
power on restart program, the monitor accepts and 
acts upon user commands to operate the iSBC 80/30 
memory and I/O ports. Specifically, the monitor 
program provides the following facilities: 

1 . Display selected areas of memory and processor 
registers. 

2. Initiate execution of user programs. 

3. Single step instruction execution. 

4. Modify contents of memory and processor 
registers. 

5. Insert instruction(s) into memory. 

6. Input hexadecimal file from paper tape reader. 

7. Output hexadecimal file to paper tape punch. 

8. Program BREAK capability. 

These facilities are described in sections 3-4 through 
3-9. Throughout the discussion of the monitor, bit 
zero is considered to be the least significant bit. The 
monitor uses seven bit ASCII without parity (bit 7 
= 0). All addresses are stated in hexadecimal nota- 
tion. 

The monitor and the operator communicate using an 
interactive console such as a CRT terminal. The 
dialogue consists of operator entered monitor com- 
mands and monitor responses, either in the form of a 
displayed message or an action performed. Following 
the reset procedure described in section 3-23 the 
monitor begins the dialogue by transmitting a signon 
message and requesting a command by displaying a 
period (prompt character). 

3.4 MONITOR COMMANDS 

Commands are entered in the form of a single upper 
case alphabetic character followed by a list of 
numeric or alphabetic parameter. The only command 
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requiring an alphabetic parameter is the "X" com- 
mand. The use of alphabetic parameters will be 
discussed in the section explaining the "X" com- 
mand. Numeric parameters are entered as hex- 
adecimal numbers. The monitor recognizes the 
characters through 9 and the upper case alphabetic 
characters A through F as legal hexadecimal digits. 
The valid range of numbers is from 1 to 4 hex digits 
(0-FFFF). If more than four digits are entered only 
the last four will be used. 

The monitor requires each command to be ter- 
minated by a carriage return. With the exception of 
the "S", "N", and "X" commands, the command is 
not acted upon until the carriage return is sensed. 
Therefore, the user can abort any command, before 
he enters the carriage return by typing any illegal 
character (such as RUBOUT or any alphabetic 
character with the exception of A through F) . 

Except where indicated otherwise, a single space is 
synonymous with the comma for use as a delimiter. 
Consecutive spaces or commas, or a space or comma 
immediately following the command letter, will be 
interpreted as null parameters. Null parameters are 
illegal in commands except the "G", "S", and "X" 
command. 

Items enclosed in square brackets "[" and "]" are 
optional. The consequences of including or omitting 
them are discussed in the text. 

In the following paragraphs the monitor command 
language is discussed. Each command is described, 
and examples of its use are included for clarity. Error 
conditions which may be encountered while 
operating the monitor are described in paragraphs 
3-19 through 3-22. 



3.5 DISPLAY MEMORY COMMAND, D 

The format for the D Command is: 

D<lowaddress>, <highaddress> 

Selected areas of addressable memory may be access- 
ed and displayed by the D command. The D com- 
mand produces a formatted listing of the memory 
area between <low address> and <high address>, in- 
clusive, on the console device. Each line of the listing 
begins with the address of the first memory location 
displayed on that line, represented as 4 hexadecimal 
digits, followed by up to 16 memory locations, each 
one represented by 2 hexadecimal digits. 

The D command may be aborted during execution by 
typing an Escape (ESC) on the console. The com- 
mand will be terminated immediately, and a new 
prompt issued. 



Example: 



D9.2A 

0009 001122 33 44 55 66 

0010 77 88 99 AA BB CC DD EE FF 10 20 30 40 50 60 70 
0020 80 90 A0 B0 CO DO E0 F0 01 02 03 



NOTE 



If the <low address> parameter is equal to 
or greater than the <high address> 
parameter, only the first location defined by 
<low address> is printed. 



3.6 PROGRAM EXECUTE COMMAND, G 

The format of the "G" command is: 

G[<start address>][<,-<break address>][,-<break 
address>] 

Control of the CPU is transferred from the monitor 
to the user's program at the specified "start ad- 
dress". If no "start address" is specified, the 
monitor uses the last value of the PC register. The 
PC register is saved during execution of any of the 
following commands or instructions. 

a. Program BREAK set by the "G" Command. 

b. "N" Command 

c. "XP" Command 

d. RST 1 instruction 

The <break address> parameters are 16-bit values 
that specify breakpoint addresses in the user pro- 
gram. If either is omitted, no corresponding break- 
point is set. If either breakpoint address is en- 
countered while executing the user program, both 
breakpoints are cleared and control is passed back to 
the monitor. The current PC and the next 3 instruc- 
tion bytes pointed at by the PC are displayed. 

A breakpoint enables the user to temporarily suspend 
execution of the user program, examine the state of 
the program's memory and registers, make modifica- 
tions if desired, and then continue the program from 
the point of suspension. When the breakpoint ad- 
dress is reached, the user program is terminated, all 
pertinent user data is saved, and control is returned 
to the monitor program. Immediately following a 
breakpoint, the value of the user program counter 
points to the memory location in which the break- 
point instruction occurred. 

3 .7 SINGLE STEP COMMAND, N 

Single user instructions are executed via the N 
command. No Carriage return is required when 
executing this command. After entry of this 
command, all registers are restored, interrupts 
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are enabled, and a single instruction within the 
user program is executed. The instruction to be 
executed is assumed to be at the address of the 
last value of the PC register saved. The PC 
register is saved during execution of any of the 
following commands or instructions: 

a. Program BREAK set by the "G" command. 

b. "N" command 

c. "XP" command 

d. RST 1 instruction 

The single step command is implemented by 
utilizing interval timer No. 1 connected to inter- 
rupt level 7.5. This timer is set immediately prior 
to exiting the monitor so a single instruction will 
be executed. The timer expires during execu- 
tion of the first user instruction and causes an 
interrupt. The monitor is re-entered, all user 
registers are saved, the contents of the user 
registers, current address, and the next three 
bytes to be executed are displayed; and the 
user is prompted for a new command. 



Example: 






User Programs 


Address 


Code 


MVIB.3 
LXIH.8000 


4000 
4002 


06 03 
21 00 80 


Monitor Interaction 






.XP XXXX-4000 

• N 

A=XX B=03 C=XX D 

M=XXXXP=4002S= 

4002NI=2100 80 


=XX E=XX F= 
7F80 


=XX H=XX L=XX 



Due to the use of a timer interrupt to provide the 
single step capability, care should be taken when 
combining single step operation with other inter- 
rupts, or when modifying the timer operation. The 
following should be noted: 

1. If an interrupt is pending when performing a 
single step, the interrupt will be serviced (CALL 
instruction) rather than executing the next user 
instruction. If the interrupt is serviced by the 
monitor an interrupt message is displayed. 
However, if the interrupt is serviced by a user's 
program, no display or indication of the inter- 
rupt is generated. 

2. On execution of an RST 1 thru 7 (user 
breakpoint instruction), the single step capability 
is suspended, and the user enters the monitor 
program with only the address of the next in- 
struction displayed. 

3. Due to the asynchronous nature of the refresh 
timing associated with the onboard RAM, the 



single step command might sometimes fail to 
function properly. In this case, the next instruc- 
tion will not be executed, and the PC and other 
registers will remain unchanged. When this oc- 
curs, the user may reissue the command and try 
again. 

If any difficulty is experienced with the single 
step command the method of refresh may be 
altered by moving the jumper wire from pins 
1 10-1 1 1 to pins 1 10-106. This enables the "invisi- 
ble refresh" feature on the iSBC 80/30 which 
will cure the problem. In this mode, however, the 
total board power consumption will be increased 
from 3% - 5% with the load on the + 12v supply 
being approximately doubled. 

4. Due to delays incurred when accessing off -board 
RAM, the single step command will function 
properly only when the monitor RAM areas are 
on-board. 



3.8 INSERT INSTRUCTION INTO 
MEMORY, I 

The format of the "I" command is: 

Kaddress> 

Single or multiple instructions are entered into 
memory with the I command. After sensing the car- 
riage return (terminating the command line), the 
monitor waits for the operator to enter a string of 
hexadecimal digits (0-9, A-F). Each digit in the string 
is converted into its binary value, and then loaded in- 
to memory, beginning at the starting address 
specified and continuing into sequential locations. 
Two hexadecimal digits are loaded into each memory 
location. 

Separators between digits (spaces, commas, carriage 
returns) are ignored; illegal characters will terminate 
the command. The escape character, ESC (echoed as 
"$") terminates the digit string. If an odd number of 
hex digits have been entered, a will be appended to 
the string. As each pair of hex digits are entered they 
are converted to binary and stored in a memory byte. 
Thus, the data has been entered even if the insertion 
is terminated with an illegal character. 



Example 1: 

.I4E10 

112233445566778899$ 

This command puts the following pattern into RAM: 
4E10 11 22 33 44 55 66 77 88 99 
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ExampleZ: 



Example: 



.I4E40 
123456789$ 

This command puts the following pattern into RAM: 

4E4012 34 56 7890 

Note that since an odd number of hexadecimal digits 
was entered a was appended to the digit string. 

3.9 MOVE MEMORY COMMAND, M 

The format of the "M" command is: 

M<low address>, <high address>, <destination> 

The M command moves the contents of memory 
<low address> through <high address>, inclusive, to 
the area of RAM beginning at <destination>. The 
contents of the source field remain undisturbed, 
unless the receiving field overlaps the source field. 

The move operation is performed on a byte-by-byte 
basis, beginning at <low addressX Care should be 
taken if <destination> is between <low address> and 
<high addressX For example, if location 4E10 con- 
tains 1A, the command, 

.M4E10,4E1F,4E11 

will result in locations 4E10 to 4E20 containing 
"1A1A1A...". 

The monitor will continue to move data until the 
source field is exhausted, or until it reaches address 
FFFF. If the monitor reaches address FFFF without 
exhausting the source field, it will move data into this 
location, then stop. 

Example: 

.M4E00, 4E0F, 4F00 

16 bytes of memory are moved from 4E00-4E0F to 
4F00-4F0F by this command. 

NOTE 

If the <low address> parameter is greater 
than the <high address> parameter, only the 
first destination address is altered. 

To fill memory with a constant set the low address to 
the constant with the "S" command and use low ad- 
dress plus one for the destination address and last ad- 
dress minus one for the high address. The following 
example will set location 1000 through 10FF to C7. 



.S1 000-44, C7 
.M1000, 10FE.1001 



3.10 READ HEXADECIMAL FILE, R 

The R command reads a hexadecimal tape from the 
paper tape reader and loads the data into the loca- 
tions specified by the address fields in the hex- 
adecimal records. The paper tape format is described 
in MCS 80/85 Absolute Object File Format 
Technical Specification, Order No. 9800183. A 
typical R command will appear as follows: 



.R 



(Turn on tape reader before executing this 
command.) 



3.11 SUBSTITUTE MEMORY 
COMMAND, S 

The format of the "S" command is: 

S<address> 

The S command allows the user to examine and op- 
tionally modify memory locations individually. The 
command functions as follows: 

1. Type an S, optionally followed by the 
hexadecimal address of the first memory location 
to be examined followed by a space or comma. If 
no address is specified, the monitor uses the last 
value of the PC register. The PC register is saved 
during execution of any of the following com- 
mands or instructions: 

1 . Program BREAK set by the "G" command 

2. "N" command 

3. "XP" command 

4. RST 1 instruction 

2. The contents of the location is displayed, 
followed by a dash (-). 

3 . To modify the contents of the location displayed, 
type in the new data, followed by a space, com- 
ma, line feed, or carriage return. If you do not 
wish to modify the location, type only the space, 
comma, line feed, or carriage return. 

4. If a space or comma is typed in step 3 above, the 
next memory location will be displayed, followed 
by a dash (-). If a carriage return is typed, the S 
command will be terminated. If a line feed is 
typed, the current address minus 1 will be 
displayed on a new line, followed by the contents 
of that location. 
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NOTE 

The line feed command will backup the ad- 
dress any number of locations even below 
the initial address of the S command. This 
allows the user to check the memory location 
just modified. 

Example: 

.S4D50 AA- BB-CC 01-13 23-24 00- (line feed) 

4D53 24- (line feed) 

4D52 13- (line feed) 

4D51 CC- (line feed) 

4D50 AA- (carriage return will terminate command) 

In this example location 4D50 which contains AA is 
unchanged, location 4D51 which contained BB now 
contains CC, location 4D52 which contained 01 now 
contains 13, and location 4D53 which contained 23 
now contains 24. A space was typed displaying loca- 
tion 4D54 then four line feeds were typed to verify 
the contents of locations 4D53, 4D52, 4D51 and 
4D50. A carriage return then terminated the com- 
mand. 

3.12 WRITE HEXADECIMAL FILE, W 

The format of the "W" command is: 

W <low address>, <high address> 

The W command transmits portions of memory to a 
paper tape punch on the teletypewriter. Data is in 
hexadecimal format. The paper tape format is 
described in MCS 80/85 A bsolute Object File Format 
Technical Specification, Order No. 9800183. A 
leader tape consisting of 60 null characters is punch- 
ed followed by the memory data specified by the 
low/high address parameters. An end of file record is 
punched automatically to terminate the tape. Follow- 
ing the end of file record, a trailer tape is punched 
consisting of 60 null characters. 

An example of the Write Hexadecimal File operation 
is as follows: 

.W4D00.4DAF (User must turn on tape punch 
before executing this command.) 

This command punches out the contents of memory 
locations 4D00 through 4DAF. 



Displaying and modification of the CPU registers is 
accomplished using the X command. The X com- 
mand uses <register identifier> to select the par- 
ticular register to be displayed. A register identifier is 
a single alphabetic character denoting a register, 
defined as follows: 



A 

B 

C 

D 

E- 

F- 



H- 

L- 

M 

P- 

S- 



8085A CPU register A 

8085ACPU register B 

8085ACPU register C 

8085ACPU register D 

8085ACPU register E 

8085A CPU flags byte, displayed in the 

form as it is stored by the "PUSH PSW" 

(hex code F5) instruction 

8085A CPU register H 

8085A CPU register L 

8085ACPU registers H and L combined 

8085A Program Counter 

8085A Stack Pointer 



The command operates as follows: 

1 . Type an X followed by a register identifier or a 
carriage return. 

2. The contents of the register are displayed (two 
hexadecimal digits for A, B, C, D, E, F, H, and 
L; four hexadecimal digits for M, P, and S), 
followed by a dash (-). 

3. The register may be modified at this time by 
typing the new value, followed by a space, com- 
ma, or carriage return. If no modification is 
desired, type only the space, comma, or carriage 
return. 

4. If a space or comma was typed in step 3, the next 
register in sequence (alphabetical order) will be 
displayed as in step 2 (unless S was just displayed 
in which case the command is terminated). If a 
carriage return was entered in step 3, the X com- 
mand is terminated. 

5. If a carriage return was typed in step 1 above, an 
annotated list of all registers and their contents is 
displayed. 



3.14 I/O SYSTEM ROUTINES 



3.13 EXAMINE AND MODIFY CPU 
REGISTERS, X 

The format of the "X" command is: 
.X[<register identifier^) 



The Monitor provides four I/O system routines 
(Device Drivers). The four routines include console 
character in and console character out, which the 
user may call upon to read and write characters from 
and to the console device. The other two routines 
allow the user to read and punch paper tapes from 
the teletypewriter. 
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The drivers interface through the Universal 
Synchronous/ Asynchronous Receiver/Transmitter 
(US ART). The monitor configures the US ART dur- 
ing a power-on or reset condition to the following 
state: 

Mode: 

1 Stop bit at 150 thru 9600 baud 

2 stop bits at 110 baud 
Parity disabled 

8 bit character length 
Baud rate factor of 64X 

Command: 
No hunt mode 
Request-To-Send high 
Receiver enabled 
Data-Terminal-Ready high at 150 through 

9600 baud 
Data-Terminal-Ready low at 110 baud 

(high during read) 
Transmitter enabled 

NOTE 

Care should be exercised if modifying the 
USART mode and command, since the 
monitor depends on the configuration defin- 
ed above for driver operation. 

The four monitor I/O system routines may be access- 
ed by calling the desired routine. The following 
paragraphs describe the routines available and their 
respective functions. 



3.15 CONSOLE INPUT— CI 

This routine returns an 8 bit character received from 
the console device to the caller in the A-register. The 
A-register and the CPU condition codes are affected 
by this operation. The entry point of this routine is 
040. 

Example: 

CI EQU 040 

CALL CI 
STA DATA 



3.16 CONSOLE OUTPUT— CO 

This routine transmits an 8 bit character, pass- 
ed from the caller in the C- register, to the con- 
sole device. The A and C registers, and the CPU 
condition codes, are affected by this operation. 
The entry point of this routine is 043. 



Example: 

CO EQU 043 

MVIC, . 
CALL CO 



3.17 READER INPUT— RI 

RI returns an 8 bit character read from the 
teletypewriter reader in the A-register. If no 
character was read from the device or the End Of File 
was read, the CARRY condition code is set equal to 
1, and the A-register is zeroed. If data is ready, the 
CARRY bit is zeroed. If a character is not received 
from the teletypewriter reader within 250 
milliseconds, an End Of File is simulated and control 
returned to the calling program. The entry point of 
this routine is 046. 

Example: 

RI EQU 046 



CALLRI 
JCEOF 
STA DATA 



ENDOF FILE SENSED 



3.18 PUNCH OUTPUT— PO 

PO transmits an 8 bit character from the calling pro- 
gram to the teletypewriter. PO is identical in format 
to CO, the only difference being the entry point ad- 
dress, 049. 

Example: 

PO EQU 049 

LHLDDATADR ;DATADR-16 BIT ADDRESS 

OF DATA BYTE 
MOV C,M ;TO BE PUNCHED 
CALL PO 



3.19 ERROR CONDITIONS 

The system monitor defaults on three types of errors; 
Invalid Character, Address Value, and Peripheral er- 
rors. The following paragraphs detail the operation 
for each of these conditions. 



3.20 INVALID CHARACTERS 

The monitor checks the validity of each character as 
it is entered from the console. As soon as the monitor 
determines that the last character entered is illegal in 
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its context, the monitor aborts the command and 
issues a "#" to indicate the error. 

Examples: 

D1400,145G# 

The character G was encountered in a parameter list 
where only hexadecimal digits and delimiters are 
valid. 



3.21 ADDRESS VALUE ERRORS 

Some commands require an address pair of the form 
<low address> <high address>. If, on these com- 
mands, the value of <low address> is greater than or 
equal to the value of <high address>, the action in- 
dicated by the command will be performed on the 
data at <low address> only. 

The valid range of addresses is 0-FFFF. Thus, if a 
hexadecimal address greater than FFFF is entered, 
only the last 4 hex digits will be used. 

Another type of address error may occur when the 
operator specifies in a command a part of memory 
which does not exist in his particular configuration. 
In general, if a nonexistent portion of memory is 
specified as the source field for an instruction, the 
data fetched will be unpredictable. If a nonexistent 
portion of memory is given as the destination field in 
a command, the command has no effect. 



RAM location 7FD0. Set the fixed priority mode 
with TRAP at the highest priority; followed by 
7.5, 6.5, 5.5 and 0-7. All interrupts are set un- 
masked. 

3 . Initialize the user's stack pointer to 7F80. 

4. Set timer 2 of the 8259 Interval Timer to MODE 
3 then automatically determine the console ter- 
minal baud rate. The timer 2 output is used as 
clock for the 8251 Univeral Synchronous/ Asyn- 
chronous Receiver/Transmitter (US ART). The 
USART clock is initially set at 9600 baud. Two 
"U" characters are used to check for baud rate. 
When the first "U" character is entered it is 
checked for 9600, 4800, 2400, and 1200 baud 
rate. If a match is found then that baud rate is set 
into the clock. If not, then a second "U" 
character must be entered. The second "U" 
character is checked for 600, 300, 150, and 110 
baud. When the baud rate has been successfully 
determined, the sign-on message "80/30 
MONITOR" will be displayed on the console. 
When the monitor is ready for a command, it 
will prompt with a period ".". 



NOTE 

After checking the first "U" the monitor 
will wait 3 seconds for the second "U" to 
be typed, if one is necessary. If the 3 se- 
cond interval expires before the second 
"U" is typed, begin the baud rate search 
procedure again. 



3.22 PERIPHERAL DEVICE ERROR 

Peripheral devices selected by the operator which are 
not ready or are non-existent will cause undefined ex- 
ecution of the Monitor (e.g., an indefinite wait for 
READY status in an I/O loop). This situation may 
be rectified by readying the device and by re- initializ- 
ing the system (refer to paragraph 3-23). 



3.23 SYSTEM INITIALIZATION 
(RESET) 

Following an initial power on or reset operation, the 
monitor program begins executing at location 0000. 
The following initialization and functions are per- 
formed: 

1 . Set timer 1 of the 8253 Interval Timer to MODE 
2, so it may be used for the single step function. 

2. Set the 8259 Programmable Interrupt Controller 
to vector into the 48 byte jump table starting at 



3.24 UTILIZING RAM STORAGE 

RAM storage locations 7F80 to 7FFF are reserved for 
the monitor stack, register save area, and the inter- 
rupt jump table. The user's stack pointer is 
automatically sete to 7F80 during the power on 
routine. RAM locations 4000 to 7F80 are available 
for the user's program. 



3.25 INTERRUPT PROCESSING 

All interrupts are serviced by a jump table stored in 
RAM at locations 7FD0 through 7FFF. By modify- 
ing the addresses in the jump table, the user can cause 
execution of his own interrupt service routine, stored 
in RAM. The interrupt jump table configuration }s 
shown in table 3-1. 
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Table 3-1 . Interrupt Jump Table Configuration 


Hexadecimal 
Address 


Interrupt 


7FD0 


TRAP 


7FD4 


7.5 


7FD8 


6.5 


7FDC 


5.5 


7FE0 





7FE4 


1 


7FE8 


2 


7FEC 


3 


7FF0 


4 


7FF4 


5 


7FF8 


6 


7FFC 


7 



Interrupts are disabled during user-monitor com- 
mand interaction. Pending interrupts will not in- 
terfere with program verification. Interrupts are 
enabled on exiting the monitor to run a program via 
the "G" or "N" command. 



3.26 RESTART PROCESSING 

Entering the monitor during program execution is ac- 
complished either by setting a breakpoint (using the 
"G" command) or placing an RST 1 instruction code 
in the program. Entering with the "G" command 
causes the current address and the next three bytes to 
be displayed. The monitor will save the state of the 
CPU: all registers, flags, user's program counter, 
and user's stack pointer. The value of these may be 
examined with the "X" command. Subsequently 
entering a "G" command will restore these values. 

When an RST instruction is encountered in the user 
program, the monitor interrupts the user program, 
saves all registers and the value in the program 
counter. The "G" command can not be used to ad- 
vance the program following an RST interrupt. 

When an RST1 instruction causes an interrupt, the 
program counter does not advance beyond the break- 
point. Therefore it is not possible to correct the pro- 
gram. By using the "S" command the instruction 



may be altered. If the RST1 instruction is to be kept, 
the "N" command may be used to step over it. 

Conversly, restart instructions RST2 through RST7 
will clear out any breakpoints extablished by the 
"G" command. 



3.27 SYSTEM PROGRAMMING 
CONSIDERATIONS 

Program development for the System 80/30 
Microcomputer may be accomplished most efficient- 
ly with the aid of a development system such as the 
Intellec Microcomputer Development System. The 
Intellec's various configurations permit program 
development in either 8085 assembly language or the 
more advanced PL/M 80 and/or Fortran 80 
languages. A concise introduction to the Intellec 
development systems is provided in the publication, 
A Guide To Intellec Microcomputer Development 
Systems, by Daniel McCracken. This publication is 
available from the Intel Literature Department and is 
identified by Order Number 9800558B. 

Intellec control software includes a ROM based pro- 
gram monitor which supervises the development 
system CPU. Diskette equipped models include the 
Intel System Implementation Supervisor (ISIS) pro- 
grams. This is a broad collection of development pro- 
grams, including a text editor, 8085 assembler, a 
Library Manager and other aids. 

PL/M is a high level language that is particularly well 
suited for use in system programming. With PL/M, 
programs may be created, compiled, modified, link- 
ed, relocated and debugged entirely on the Intellec 
system. 

Fortran is a high level language that is particularly 
well suited to application programs. Intel's Fortran 
80 compiler implements the ANSI Fortran 77 stan- 
dard. In addition to the features of PL/M, Fortran 
has arithmetic processing capability and a variety of 
facilities for handling formatted input and output. 
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CHAPTER 4 
PRINCIPLES OF OPERATION 



4.1 INTRODUCTION 

This chapter briefly describes the fundamental opera- 
tion of the System 80/30 Microcomputer. The 
following paragraphs describe, on a general systems 
level, basic operation. A more detailed description of 
the iSBC 80/30 Single Board Computer and circuit 
analysis is provided in Chapter 4 of the iSBC 80/30 
Hardware Reference Manual. 

4.2 FUNCTIONAL DESCRIPTION 

The System 80/30 Microcomputer consists of four 
main components: chassis, power supply, cardcage 
and computer board (refer to figures 4-1 and 4-2). 
The following paragraphs give a summarized func- 
tional description of the System 80/30. 

4.3 iSBC 655 CHASSIS 

The iSBC 655 Chassis components include the front 
panel with switches and indicators, two cooling fans, 
and all chassis assembly sheet metal and structural 
hardware. 



4.4 FRONT PANEL SWITCHES AND IN- 
DICATORS. Three switches are associated with the 
front panel: the power ON/OFF indicator— switch; 
the RUN switch; and the HALT switch. 

The power ON/OFF indicator switch (SI) is located 
on the left side of the panel. When power is applied, 
the indicator switch will illuminate. The illuminator 
bulb is accessed by pulling off the translucent switch 
cap. 

The other two front panel switches are momentary 
rocker types, labeled RESET (S3) and INTERRUPT 
(S4). The RESET switch is wired to pin 14 of the 
backplane. When depressed, the switch generates the 
signal RESET/ which is synonymous with INIT/ on 
the backplane. The flip-flop which actually generates 
RESET/ is located on the front panel P.C.B. and is 
shown in figure 4-5 of the iSBC 655 Hardware 
Reference Manual. 

The INTERRUPT switch functions in a similar man- 
ner. When the switch is depressed, circuitry on the 
front panel P.C.B. generates the signal INT1/ which 
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Figure 4-2. System 80/30 Major Assembly Location Diagram 



is wired to pin 42 on the backplane. Refer to para- 
graph 3-34 of the iSBC 80/30 Hardware Reference 
Manual for a complete description of system in- 
terrupts. 



The RUN and HALT indicators are actually light 
emitting diodes mounted on the front panel printed 
circuit board. The RUN and HALT indicators il- 
luminate as a function of three iSBC 80/30 status 
signals: WAIT/, HALT/, and ALE. The RUN in- 
dicator will illuminate when ALE is true; and when 
either WAIT/ or HALT/ is false. Conversly, the 
HALT indicator illuminates when WAIT/ or 
HALT/ is true. This circuitry is shown in figure 4-5 
of the iSBC 655 Hardware Reference Manual. 



4.5 LINE VOLTAGE SELECT SWITCH, 
FUSE. The line voltage select switch is located adja- 
cent to the cardcage fan; and is shown schematically 
in figure 4-2 of the iSBC 655 Hardware Reference 
Manual. The switch has two positions, correspond- 
ing to the two usable line voltages; 115 Vac and 230 
Vac. A keyed switch locking plate secures the switch 
in one position. The switch can be set to the other 
position, only by loosening the two plate hold-down 
screws, and flipping the plate over. Each side of the 
plate is labeled. 

Fuse Fl is located on the rear chassis panel, right 
side. A 2.5 ampere fuse should be used for 230 volt 
operation and a 5 ampere fuse is used for 115 volt 
operation. 
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The line filter is located directly below the fuse. The 
line filter hardware also functions as the power cord 
connector. 



4.6 FANS. The chassis utilizes two fans for cooling 
purposes. Both are located on the power ON/OFF 
switch side of the chassis. Air flow is directed into the 
chassis, with one fan cooling the power supply and 
the other cooling the cardcage. Power for each fan is 
derived directly from the line voltage. 



4.7 iSBC 604 CARDCAGE AND 
BACKPLANE 

The cardcage houses a total of four iSBC boards, in- 
cluding the iSBC 80/30. Considered part of the card- 
cage, the backplane is actually a printed circuit board 
with Multibus and other connectors attached. 
Operating voltages reach the boards via the 
backplane and all interboard communication occurs 
on the Multibus. The backplane's Multibus edge con- 
nector allows additional external cardcages to be at- 
tached. 

Signal terminator resistors are located on the 
backplane P.C.B., and are shown schematically in 
figure 4-1 of the iSBC 604/614 Hardware Reference 
Manual. 

An additional connector, J5A, is installed on the 
backplane to accommodate several iSBC 80/30 status 
signals and auxiliary RAM refresh power. 



4.8 iSBC 635 POWER SUPPLY 

This power supply provides regulated DC voltage 
(+12,-12, + 5, & -5) from 100, 115, 215 or 230 Vac 
power sources. Output levels are delivered through 
keyed connectors which mate directly to the front 



panel and backplane. All outputs have current 
limiting and overvoltage protection. These tolerances 
are listed in the Specifications section of the iSBC635 
Hardware Reference Manual. 



4.9 POWER FAIL STATUS. The power supply is 
equipped with an AC line monitor which will 
generate an AC low signal, PFI/, when the source 
falls below 90% of its nominal value. The signal 
PFI/ is wired to pin 19 of J5A on the backplane. This 
line is connected to the interrupt jumper matrix on 
the iSBC 80/30. 



4.10 OUTPUT VOLTAGE ADJUSTMENTS. 

Each output voltage level is individually adjustable. 
Procecdures for these adjustments are given in 
Chapter 3 of the iSBC 635 Hardware Reference 
Manual. 



4.11 iSBC 80/30 SINGLE BOARD 
COMPUTER 

At the heart of the System 80/30 is the iSBC 80/30 
Single Board Computer. The iSBC 80/30 includes an 
Intel 8085 A CPU, 16K bytes of dynamic RAM, one 
serial and three parallel I/O ports, a programmable 
timer, priority interrupt logic, and Multibus control 
logic. 

Two DIP sockets are provided to accommodate up to 
8K bytes of ROM or EPROM, using IK, 2K or 4K 
chips. An additional socket is provided for an Intel 
8041/8741 Universal Peripheral Interface (UPI). 

Chapters 3 and 4 of the iSBC 80/30 Hardware 
Reference Manual provide a comprehensive detailed 
description of board operation and programming. 
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APPENDIX A 
iSBC 930 MONITOR LISTING 
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MODULE 



PAGE 



LOC OBJ 



SEQ 

1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

= 14 

= 15 

= 16 

= 17 

= 18 

= 19 

= 20 

= 21 

= 22 

= 23 

. 24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 



SOURCE STATEMENT 



$MOD85 



********************************************************************** 
********************************************************************** 

80/30 MONITOR 
(MON830) 
VERSION 1.2 
24 APRIL 1978 

********************************************************************** 
********************************************************************** 
$ INCLUDE ( : Fl : CPYRTA. NOT) 

(C) 1978 INTEL CORPORATION. ALL RIGHTS RESERVED. NO PART OF THIS 
PROGRAM OR PUBLICATION MAY BE REPRODUCED, TRANSMITTED, TRANSCRIBED, 
STORED IN A RETRIEVAL SYSTEM, OR TRANSLATED INTO ANY LANGUAGE OR 
COMPUTER LANGUAGE, IN ANY FORM OR BY ANY MEANS, ELECTRONIC, 
MECHANICAL, MAGNETIC, OPTICAL, CHEMICAL, MANUAL OR OTHERWISE, 
WITHOUT THE PRIOR WRITTEN PERMISSION OF INTEL CORPORATION, 
3065 BOWERS AVENUE, SANTA CLARA, CALIFORNIA 95051. 

********************************************************************** 
********************************************************************** 



ABSTRACT 



THIS PROGRAM RUNS ON THE SBC 80/30 BOARD AND IS DESIGNED TO PROVIDE 

THE USER WITH A MINIMAL MONITOR. BY USING THIS PROGRAM, 

THE USER CAN EXAMINE AND CHANGE MEMORY OR CPU REGISTERS, LOAD 

A PROGRAM (IN ABSOLUTE HEX) INTO RAM, AND EXECUTE INSTRUCTIONS 

ALREADY IN MEMORY. THE MONITOR ALSO PROVIDES THE USER WITH 

ROUTINES FOR PERFORMING CONSOLE I/O AND PAPER TAPE I/O. 



PROGRAM ORGANIZATION 



THE LISTING IS ORGANIZED IN THE FOLLOWING WAY. THE FIRST ROUTINE 

IS THE COMMAND RECOGNIZER, WHICH IS THE HIGHEST LEVEL 

ROUTINE IN THE PROGRAM. NEXT, ARE THE ROUTINES TO IMPLEMENT 

THE VARIOUS COMMANDS, FOLLOWED BY THE INTERRUPT HANDLERS, 

AND FINALLY THE UTILITY ROUTINES WHICH ACTUALLY DO THE DIRTY WORK. 

WITHIN EACH SECTION, THE ROUTINES ARE ORGANIZED IN ALPHABETICAL 
ORDER, BY ENTRY POINT OF THE ROUTINE. 

THE 80/30 MONITOR CAN RESIDE IN ONE 2716 PROM. 
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MODULE 



PAGE 



LOC OBJ 



00AF 
0080 
0040 
0020 
0010 
0008 
0004 
0002 
0078 
0066 
0055 
0080 
0078 
0066 
0055 
0027 
00ED 
00EC 
00EC 
00ED 
000D 
00DD 
00DE 
0070 
00B6 
8000 
7FB7 
001B 
0020 
000F 
007F 
00C3 
0DA 
00F6 
007F 
0000 
00FF 
000A 
0040 



SEQ 

53 
54 
55 
56 
57 
58 
59 
60 
61 
62 
63 
64 
65 
66 
67 
68 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
80 
81 
82 
83 
84 
85 
86 
87 
88 
89 
90 
91 
92 
93 
94 
95 
96 
97 
98 
99 
100 
101 
102 
103 
104 
105 
106 
107 



SOURCE STATEMENT 

THE PROGRAM ALSO EXPECTS THAT RAM LOCATIONS 7F80H TO 7FE0H, 
INCLUSIVE, ARE RESERVED FOR THE PROGRAM'S OWN USE. THESE 
LOCATIONS MAY BE ALTERED, HOWEVER, BY CHANGING THE EQU'ED 
SYMBOL "DATA" AS DESIRED. 



***************************************************************** 



MONITOR EQUATES 



***************************************************************** 



B110 

B150 

B300 

B600 

B1200 

B2400 

B4800 

B9600 

CH15 

CH30 

CH60 

CH12 

CH24 

CH48 

CH96 

CMD 

CNCTL 

CNIN 

CNOUT 

CONST 

CR 

CTR1 

CTR2 

C1M0 

C2M3 

DATA 

REGS 

ESC 

EOIC 

HCHAR 

HREGS 

JMCMD 

ICCP 

ICW1 

ICW2 

IMASK 

INVRT 

LF 

LLOW 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 



00AFH 

0080H 

0040H 

0020H 

0010H 

0008H 

0004H 

0002H 

078H 

066H 

P55H 

08 0H 

078H 

066H 

055H 

027H 

0EDH 

0ECH 

0ECH 

0EDH 

00DH 

0DDH 

0DEH 

070H 

0B6H 

2*16384 

DATA-73 

01BH 

020H 

00FH 

HIGH REGS 

0C3H 

0DAH 

0F6H 

HREGS 

0H 

00FFH 

00AH 

040H 



COUNT FOR 110 BAUD TIMER 
COUNT FOR 150 BAUD TIMER 
COUNT FOR 300 BAUD TIMER 
COUNT FOR 600 BAUD TIMER 
COUNT FOR 1200 BAUD TIMER 
COUNT FOR 2400 BAUD TIMER 
COUNT FOR 4800 BAUD TIMER 
COUNT FOR 9600 BAUD TIMER 
RECOGNITION CHAR FOR 150 BAUD 
RECOGNITION CHAR FOR 300 BAUD 
RECOGNITION CHAR FOR 600 BAUD 
RECOGNITION CHAR FOR 1200 BAUD 
RECOGNITION CHAR FOR 2400 BAUD 
RECOGNITION CHAR FOR 4800 BAUD 
RECOGNITION CHAR FOR 9600 BAUD 
INITIALIZATION 
CONSOLE USART CONTROL PORT 
CONSOLE INPUT PORT 
CONSOLE OUTPUT PORT 
CONSOLE STATUS INPUT PORT 
CODE FOR CARRIAGE RETURN 
COUNTER #1 
COUNTER #2 



END OF MONITOR 16K RAM USAGE 

START OF REGISTER SAVE AREA 

CODE FOR ESCAPE CHARACTER 

END OF INT CMD WORD 

MASK TO SELECT LOWER HEX CHAR FROM BYTE 

; HIGH BYTE OF ADDRESS 
; JUMP COMMAND FOR RAM TABLE 
INT CONTROLLER COM PORT 
INT CMD WORD 1 
INT CMD WORD 2 
INT MASK VALUE 

MASK TO INVERT HALF BYTE FLAG 
CODE FOR LINE FEED 
LOWEST BYTE ADDRESS FOR SINGLE STEP 
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MODULE 



PAGE 



LOC OBJ 

000F 
004F 
00CF 
00DB 
000F 
000F 
000B 
008B 
007F 
0002 
0037 
0040 
00CF 
0054 
001B 
00DF 
000F 
000B 
0010 
0001 
0037 
0035 
0004 
00F0 
00FF 
7F80 



0000 



0000 F3 

0001 3E4F 
0003 D3ED 
0005 C35FC 



008 F3 
0009 CD9106 
000C C32F04 
000F 00 



SEQ 

108 
109 
110 
111 
112 
113 
114 
115 
116 
117 
118 
119 
120 
121 
122 
123 
124 
125 
126 
127 
128 
129 
130 
131 
132 
133 
134 
135 
136 
137 
138 
139 
140 
141 
142 
143 
144 
145 
146 
147 
148 
149 
150 
151 
152 
153 
154 
155 
156 
157 
158 
159 
160 
161 
162 



SOURCE STATEMENT 



LNIB 

MODE 

MODE2 

MSKPT 

NEWLN 

NEXCT 

OCW3 

ONEMS 

PRTY0 

RBR 

RESURT 

RSTUST 

RST1 

STM1 

TERM 

TMCP 

TMDIS 

TMENB 

TMRST 

TRDY 

TTYADV 

TTYSTP 

TXBE 

UNIB 

UPPER 

USAREA 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 



00FH 

04FH 

0CFH 

0DBH 

0FH 

15 

0BH 

139 

007FH 

002H 

037H 

040H 

0CFH 

054H 

01BH 

0DFH 

0FH 

0BH 

010H 

01H 

037H 

035H 

04H 

0F0H 

0FFH 

DATA-128 



LOWER 4 BIT NIBBLE OF BYTE 
MODE SET FOR USART 
TWO STOP BITS PLEASE. 
INT CONTROLLER CMD PORT 

MASK FOR CHECKING MEMORY ADDR DISPLAY 
NEXT TIMER COUNT FOR CLOCK 1. 
INT OPERATION CMD WORD 3 
1 MILLISECOND CONSTANT 

MASK TO CLEAR PARITY BIT FROM CONSOLE CHAR 
RECEIVER BUFFER STATUS READY 
RESET ERROR AND SET DTR. 
USART MODE RESET COMMAND 
RESTART 1 INSTRUCTION 
MODE 2 COUNTER 1 

CODE FOR ICMD TERMINATING CHARACTER (ESCAPE) 
COMMAND FOR INTERVAL TIMER 
DISABLE ALL INTERRUPTS MASK 
ENABLE 7.5 INTERRUPTS 
RESET 7.5 INTERRUPT 
MASK TO TEST TRANSMITTER STATUS 
TTY READER ADVANCE COMMAND 
TTY READER STOP COMMAND 
CHECK FOR TRANSMITTER BUFFER EMPTY 
UPPER 4 BIT NIBBLE OF BYTE 
DENOTES UPPER HALF OF BYTE IN ICMD 
; START OF USER STACK AREA 



***************************************************************** 
ORG 0H 



LOK: 



DI 

MVI A, MODE 

OUT CNCTL 

JMP INUST 



BETTER FILLER 

USART SET UP MODE. 

OUTPUT MODE 

BRANCH TO COMPLETE USART INITIALIZATION 



***************************************************************** 



RESTART ENTRY POINT 



***************************************************************** 



GO: 



DI 

CALL REGSV 

JMP GOBK1 

NOP 



DISABLE INTERRUPTS ON MONITOR ENTRANCE 
SAVE ALL USER REGISTERS 
HAVE WE A BREAK ENTRY? 
FILLER 
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MODULE 



PAGE 



LOC OBJ 



SEQ 



SOURCE STATEMENT 



0010 



0P10 
0011 
0014 
0015 
0016 
0017 

0018 



F3 

C3CC7F 

00 

00 
00 
00 



0018 


F3 


0019 


C3CC7F 


001C 


00 


001D 


00 


001E 


00 


00 IF 


00 



0020 

0020 
0021 

0024 

0024 
0025 

0028 

0028 
0029 

002C 

002C 
002D 

0030 

0030 
0031 

0034' 

0034 
0035 

0038 

0038 
0039 



F3 
C3CC7F 



F3 
C3D07F 



F3 
C3CC7F 



F3 
C3DC7F 



F3 ■ 
C3CC7F 



F3 
C3D87F 



F3 
C3CC7F 



163 

164 

165 

166 

167 

168 

169 

170 

171 

172 

173 

174 

175 

176 

177 

178 

179 

180 

1.81 

182 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 

193 

194 

195 

196 

197 

198 

199 

200 

201 

202, 

203: 

204 

205 

206 

207 

208: 

209 

2.1.0 

211 

212 

213 

214 

215 

216 

217 



ORG 



010H 



DI 




; STOP INTERRUPTS ON MONITOR ENTRANCE 


JMP 
NOP 


OTHER 


; RST 2 
; FILLER 


NOP 




; FILLER 


NOP 




; FILLER 


NOP 




; FILLER 



ORG 

DI 

JMP 

NOP 

NOP 

NOP 

NOP 

ORG 

DI 



018H 



OTHER 



020H 



JMP 


OTHER 


ORG 


024H 


DI 




JMP 


TRAP 


ORG 


028H 


DI 




JMP 


OTHER 


ORG 


2CH 


DI 




JMP 


USIN1 


ORG 


030H 


DI 




JMP 


OTHER 


ORG 


034H 


DI ; 




JMP. 


USIN2 


ORG 


038H 


DI 


, 


JMP 


OTHER 



; STOP INTERRUPTS ON MONITOR ENTRANCE 

; RST 3 

; FILLER 

; FILLER 

; FILLER 

; FILLER 



; STOP INTERRUPTS ON MONITOR ENTRANCE 
; RST 4 



; STOP INTERRUPTS ON MONITOR ENTRANCE 
; TRAP INTERRUPT (4.5) 



; STOP INTERRUPTS ON MONITOR ENTRANCE 
; RST 5 



; STOP INTERRUPTS ON MONITOR ENTRANCE 
; OTHER 5.5 INTERRUPT 



STOP INTERRUPTS ON MONITOR ENTRANCE 
RST 6 



STOP INTERRUPTS ON MONITOR ENTRANCE 
RST 6.5 INTERRUPT 



STOP INTERRUPTS ON MONITOR ENTRANCE 
RST 7 
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PAGE 



LOC OBJ 



003C 

003C F3 
003D C3D47F 



0040 

0040 C3D804 

0043 C3EB04 

0046 C3C106 

0049 C3EB04 



004C 28432920 
0050 31393738 
0054 20494E54 
0058 454C2043 
005C 4F5250 



005F 3E27 
0061 D3ED 
0063 21777F 
0066 22C17F 

0069 31B77F 
006C 3E70 
006E D3DF 

0070 3EB6 
0072 D3DF 

0074 210200 
0077 3E37 
0079 D3ED 
007B 7D 
007C D3DE 
007E 7C 
007F D3DE 



SEQ 

218 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
230 
2.31 
232 
233 
234 
235 
236 
237 
238 



239 
240 
241 
242 
243 
244 
245 
246 
247 
248 
249 
250 
251 
25 2 
253 
254 
255 
256 
257 
258 
259 
260 
261 
262 
263 
264 
265 
266 
267 
268 



SOURCE STATEMENT 



ORG 

DI 
JMP 



03CH 



; STOP INTERRUPTS ON MONITOR ENTRANCE 
; RST 7.5 INTERRUPT 



USINT 

BRANCH TABLE FOR USER ACCESSIBLE ROUTINES 
ORG 040H 



USECI 
USECO 
USERI 
USEPO 

7 
CPYRT: 



JMP 
JMP 
JMP 
JMP 

DB 



CI ; CONSOLE IN 

CO ; CONSOLE OUT 

RI ; READER IN 

PO ; PUNCH OUT 

' (C) 1978 INTEL CORP' 



***************************************************************** 



DESCRIPTION: INUST OUTPUTS TO THE USART THE COMMAND WORD 
LOOKS FOR THE LETTER 'U' TO DETERMINE THE BAUD RATE OF 
THE USERS CONSOLE. INITIALIZES THE STACK POINTER, 
THE INTERVAL TIMER, AND THE INTERRUPT CONTROLLER. 



INUST: 



BRSEL: 



MVI 

OUT 

LXI 

SHLD 

LXI 

MVI 

OUT 

MVI 

OUT 

LXI 
MVI 
OUT 
MOV 
OUT 
MOV 
OUT 



A,CMD ; 

CNCTL ; OUTPUT COMMAND WORD TO USART 

H,MSTAK-64 ; LOAD POINTER TO STACK 

SSAVE ; INITIALIZE USER STACK POINTER 

SP,MSTAK ; INITIALIZE MONITOR STACK 

A,C1M0 ; INITIALIZE SINGLE STEP TIMER MODE 

TMCP ; 

A,C2M3 ; INITIALIZE COUNTER #2 FOR BAUD RATE 

TMCP ; OUTPUT COMMAND WORD TO INTERVAL TIMER 



H,B9600 

A,RESURT 

CNCTL 

A,L 

CTR2 

A,H 

CTR2 



LOAD HIGHEST BAUD RATE FACTOR 

; RESET USART STATUS ERRORS AND- 

SET 'DTR' 

LEAST SIGNIFICANT WORD FOR CTR2 

OUTPUT WORD TO CTR 2 

MOST SIGNIFICANT WORD FOR CTR2 

OUTPUT WORD TO CTR2 
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MODULE 



PAGE 



LOC 


OBJ 


0081 


11E803 


0084 


CDFC04 


0087 


IB 


0088 


DBED 


008A 


E602 


008C 


C29700 


008F 


7B 


0090 


B2 


0091 


C28400 


009 4 


C37400 


0097 


DBEC 


0099 


4F 


009A 


E67F 


009C 


FE55 


009E 


CA0E01 


00A1 


29 


00A2 


79 


00A3 


FE66 


00A5 


CAB400 


00A8 


29 


00A9 


FE78 


00AB 


CAB400 


00AE 


29 


00AF 


FE80 


00B1 


C2BD00 


00B4 


7D 


00B5 


D3DE 


00B7 


7C 


00B8 


D3DE 


00BA 


C30E01 


00BD 


29 


00BE 


7D 


00BF 


D3DE 


00C1 


7C 


00C2 


D3DE 


00C4 


0E78 


00C6 


CDFC04 


00C9 


0D 


00CA 


C2C600 


0CD 


DBEC 


00CF 


11B80B 


•00D2 


CDFC04 


00D5 


IB 


0D6 


DBED 


0D8 


E602 


0DA 


C2E500 


0DD 


7B 


00DE 


B2 


00DF 


C2D200 



SEQ 



SOURCE STATEMENT 



269 


LXI 


D,1000 


270 BRS07: 






271 


CALL 


DELAY 


272 


DCX 


D 


273 


IN 


CONST 


274 


ANI 


RBR 


275 


JNZ 


BRS08 


276 


MOV 


A,E 


277 


ORA 


D 


278 


JNZ 


BRS07 


279 


JMP 


BRSEL 


280 BRS08: 






281 


IN 


CNIN 


282 


MOV 


C,A 


283 


ANI 


PRTY0 


284 


CPI 


CH96 


285 


JZ 


IICR 


286 


DAD 


H 


287 


MOV 


A,C 


288 


CPI 


CH48 


289 


JZ 


BRS15 


290 


DAD 


H 


291 


CPI 


CH24 


292 


JZ 


BRS15 


293 


DAD 


H 


294 


CPI 


CH12 


295 


JNZ 


BRS20 


296 BRS15: 






297 


MOV 


A,L 


298 


OUT 


CTR2 


299 


MOV 


A,H 


300 


OUT 


CTR2 


301 


JMP 


IICR 


302 BRS20: 






303 


DAD 


H 


304 


MOV 


A,L 


305 


OUT 


CTR2 


306 


MOV 


A,H 


307 


OUT 


CTR2 


308 


MVI 


C,120 


309 BRS25: 






310 


CALL 


DELAY 


311 


DCR 


C 


312 


JNZ 


BRS25 


313 


IN 


CNIN 


314 


LXI 


D,300 


315 BRS30: 






316 


CALL 


DELAY 


317 


DCX 


D 


318 


IN 


CONST 


319 


ANI 


RBR 


320 


JNZ 


BRS35 


321 


MOV 


A,E 


322 


ORA 


D 


323 


JNZ 


BRS30 



SETUP 1 SECOND TIMEOUT 

1 MS DELAY 

DECREMENT TIMER 

INPUT USART STATUS 

CHECK FOR RECEIVER BUFFER READY 

NOT YET - WAIT 1 MS AND CHECK AGAIN 

TEST FOR ZERO — 

AFTER DECREMENTING 

CONTINUE TO CHECK STATUS FOR 1 SEC 

AFTER 1 SEC REINITIALIZE BAUD RATE SEARCH 

READY SO GET CHARACTER 

SAVE CHAR. 

MASK OFF PARITY BIT 

COMPARE FOR CORRECT CHAR. 

GO TO INTERRUPT INITIALIZATION 

DOUBLE THE CLOCK RATE FOR THE CLOCK 

RESTORE REG A WITH 8 BIT CHAR 

TEST FOR THE 4800 SHIFT CHAR 

YES IT IS 4800 BAUD. 

DOUBLE THE CLOCK RATE FOR CLOCK 

TEST 2400 SHIFTED CHAR. 

YES IT IS 2400 BAUD. 

DOUBLE THE CLOCK RATE FOR CLOCK 

TEST 1200 SHIFTED CHAR. 

NO THE ENTER SECOND CHAR SEQUENCE 

LEAST SIGNIFICANT WORD FOR CTR2 

OUTPUT WORD TO CTR2 

MOST SIGNIFICANT BYTE FOR CTR2 

OUTPUT BYTE TO CTR2 

GO TO INTERRUPT INITIALIZATION VIA DELAY 

DOUBLE CLOCK RATE FOR 600 BAUD 

LEAST BYTE FOR CTR2 

OUTPUT TO CTR2 

MOST WORD FOR CTR2 

OUTPUT TO CTR2 

SET UP 120 MS TIMER 

] MS DELAY 

DECREMENT TIMER 

JUMP IF TIMER NOT EXPIRED 

CLEAR USART INPUT BUFFER 

SET UP 3 SECOND TIMEOUT 

1 MS DELAY 

DECREMENT TIMER 

INPUT USART STATUS 

CHECK FOR RECEIVER BUFFER READY 

NOT YET - WAIT 1 MS AND CHECK AGAIN 

TEST FOR ZERO — 

AFTER DECREMENTING 

CONTINUE TO CHECK STATUS FOR 1 SEC?? 
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MODULE 



PAGE 



LOC OBJ 



00E2 C37400 



00E5 


DBEC 


00E7 


4F 


00E8 


E67F 


0EA 


FE55 


00EC 


CA0E01 


00EF 


29 


00F0 


79 


00F1 


FE66 


00F3 


CAB400 


00F6 


29 


0PF7 


FE78 


00F9 


CAB400 


00FC 


21AF00 


00FF 


3E40 


0101 


D3ED 


0103 


3ECF 


0105 


D3ED 


0107 


3E35 


0109 


D3ED 


010B 


C3B400 


010E 


0EC8 


0110 


CDFC04 


0113 


0D 


0114 


C21001 


0117 


DBEC 


0119 


3EF6 


011B 


D3DA 


011D 


3E7F 


011F 


D3DB 


0121 


3E00 


0123 


D3DB 


0125 


21807F 


0128 


22C17F 


012B 


F9 



012C 218507 
012F 0615 

0131 4E 

0132 CD0705 

0135 23 

0136 05 

0137 C23101 

013A 119A07 



SEQ 

324 
325 
326 
327 
328 
329 
3 30 
331 
332 
333 
334 
335 
336 
337 
338 
339 
340 
341 
342 
343 
344 
345 
346 
347 
348 
34 9 
350 
351 
352 
353 
354 
355 
356 
357 
358 
359 
360 
361 
362 
363 
364 
365 
366 
367 
368 
369 
370 
371 
372 
373 
374 
375 
376 
377 
378 



BRS35: 



IICR: 



IICR5: 



SOURCE STATEMENT 



JMP 



MVI 



BRSEL 



AFTER 1 SEC REINITIALIZE BAUD RATE SEARCH? 

READY SO GET SECOND CHAR 

SAVE CHAR 

MASK OFF PARITY BIT 

COMPARE FOR CORRECT CHAR. 

YES 600 BAUD, GO TO INTERUPT INITIALIZATION 

DOUBLE CLOCK RATE 

RESTORE REG A 

TEST FOR 300 BAUD 

YES 300 BAUD 

DOUBLE CLOCK RATE 

TEST FOR 150 BAUD 

YES 150 BAUD 

GET 110 CLOCK RATE 175 

; USART RESET VALUE 
RESET USART TO ACCEPT NEW MODE INST. 
TWO STOP BITS MODE INSTRUCTION 
LOAD NEW MODE INSTRUCTION 
r RESET USART STATUS ERRORS AND- 
TURN OFF DTR (READER TAPE OFF) 
SET UP BAUD RATE IN CLOCK 

; SET UP 200 MS TIMER 

1 MS DELAY 

DECREMENT TIMER 

JUMP IF TIMER NOT EXPIRED 

CLEAR USART INPUT BUFFER 

INITIALIZE INTERRUPT CONTROLLER 

OUTPUT COMMAND WORD #1 

OUTPUT COMMAND WORD #2 

INTERRUPT MASK VALUE 

OUTPUT MASK WORD TO CONTROLLER 

; INITIALIZE USER STACK POINTER 

TEMP STACK POINTER 
********************************************************************** 

PRINT SIGNON MESSAGE 
********************************************************************** 



IN 


CNIN 


MOV 


C,A 


AN I 


PRTY0 


CPI 


CH60 


JZ 


IICR 


DAD 


H 


MOV 


A,C 


CPI 


CH30 


JZ 


BRS15 


DAD 


H 


CPI 


CH15 


JZ 


BRS15 


LXI 


H,B110 


MVI 


A,RSTUST 


OUT 


CNCTL 


MVI 


A,MODE2 


OUT 


CNCTL 


MVI 


A,TTYSTP 


OUT 


CNCTL 


JMP 


BRS15 



C,200 



CALL 


DELAY 


DCR 


C 


JNZ 


IICR5 


IN 


CNIN 


MVI 


A,ICW1 


OUT 


ICCP 


MVI 


A,ICW2 


OUT 


ICCP+1 


MVI 


A,IMASK 


OUT 


MSKPT 


LXI 


H,USAREA 


SHLD 


SSAVE 


SPHL 





LOK15: 



LXI 



H,SGNON ; GET ADDRESS OF SIGNON MESSAGE 

; LENGTH OF SIGN ON MESSAGE 



FETCH NEXT CHAR TO C REG 
SEND IT TO THE CONSOLE 
POINT TO NEXT CHARACTER 
END OF MESSAGE? 
RETURN FOR NEXT CHARACTER 

LOAD START OF PROM JUMP TABLE 



LXI 


H,SGNON 


MVI 


B,LSGNON 


MOV 


C,M 


CALL 


ECHO 


INX 


H 


DCR 


B 


JNZ 


LOK15 



D,JPTB 
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LOC OBJ 

013D 21C47F 
0140 060F 

0142 36C3 

0144 23 

0145 1A 

0146 77 

0147 23 

0148 13 
014 9 1A 
014A 77 
014B 23 
014C 13 
014D 3600 
014F 23 

0150 05 

0151 C24201 



0154 31B77F 

0157 0E2E 
0159 CD0705 
015C CD3605 
015F CD0705 

0162 79 

0163 010900 
0166 21CC07: 

0169 BE 
016A CA7501- 
016D 23 
016E 0D 



SEQ 

379 
380 
381 
382 
383 
384 
385 
38 6 
387 
388 
389 
390 
391 
392 
393 
394 
395 
396 
397 
398 
399 
400 
401 
402 
403 
404 
405 
406 
407 
408 
409 
410 
411 
412 
413 
414 
415 
416 
417 
418 
419 
420 
421 
422 
423 
424 
425 
426 
427 
428 
429 

'430 
431 

i 43 2 
433 



SOURCE STATEMENT 



LOK20: 



LXI 


H,RAMTB 


MVI 


B,JPLG 


MVI 


M,JMCMD 


INX 


H 


LDAX 


D 


MOV 


M,A 


INX 


H 


INX 


D 


LDAX 


D 


MOV 


M,A 


INX 


H 


INX 


D 


MVI 


M,0 


INX 


H 


DCR 


B 


JNZ 


LOK20 



LOAD START OF RAM JUMP TABLE 
LENGTH OF TABLE IN "B" 



; FOR 4 BYTES SPACING 



LOOP UNTIL DONE 
***************************************************************** 



COMMAND RECOGNIZING ROUTINE 



***************************************************************** 

FUNCTION* GETCM 

INPUTS* NONE 

OUTPUTS* NONE 

CALLS* GETCH, ECHO, ERROR 

DESTROYS* A,B,C,H,L,F/F'S 

DESCRIPTION* GETCM RECEIVES AN INPUT CHARACTER FROM THE USER 

AND ATTEMPTS TO LOCATE THIS CHARACTER IN ITS COMMAND 
CHARACTER TABLE. IF SUCCESSFUL, THE ROUTINE 
CORRESPONDING TO THIS CHARACTER IS SELECTED FROM 
A TABLE OF COMMAND ROUTINE ADDRESSES, AND CONTROL 
IS TRANSFERRED TO THIS ROUTINE. IF THE CHARACTER 
DOES NOT MATCH ANY ENTRIES/CONTROL IS PASSED TO 
THE ERROR HANDLER; 



GETCM: 



LXI SP,MSTAK 



GTC05: 



MVI 




CALL 


ECHO ; 


CALL 


' GETCH ; 


CALL 


ECHO 


MOV 


A,C 


LXI 


B,NCMDS ; 


LXI 


H,CTAB ; 


CMP 


M 


JZ 


GTC10 ; 


INX 


H ; 


DCR 


c 



; ALWAYS WANT TO RESET STACK PTR TO MONITOR 
/STARTING VALUE SO ROUTINES NEEDN'T CLEAN UP 
PROMPT CHARACTER TO C 

SEND PROMPT CHARACTER TO USER TERMINAL 1 
GET COMMAND CHARACTER TO C 
ECHO CHARACTER TO USER < : ! 

PUT COMMAND CHARACTER INTO ACCUMULATOR 1 
C CONTAINS LOOP AND INDEX COUNT 
'HL POINTS INTO COMMAND TABLE : ' : ; 

COMPARE TABLE ENTRY- 1 AND CHARACTER : '■ : : 
BRANCH IF EQUAL - COMMAND RECOGNIZED' 1 
ELSE, INCREMENT TABLE POINTER ■ ' ; 
DECREMENT LOOP COUNT' 
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LOC OBJ 

016F C26901 
0172 C32505 

0175 21B807 

0178 09 

0179 09 
017A 7E 
017B 23 
017C 66 
017D 6F 
017E E9 



017F 0E02 

0181 CD7105 

0184 Dl 

0185 El 

0186 CD9304 

0189 0E20 

018B CD0705 

018E 7E 

018F CDD405 

0192 CDAA04 

0195 DA2A05 

0198 CDB605 

019B DA2A05 
019E 23, 
019F 7D 
01A0 E60F 

01A2 C28901 
01A5. CDF604 
01A8' C3860ir 



SEQ 

434 
435 
436 
437 
438 
439 
440 
441 
442 
443 
444 
445 
446 
447 
448 
449 
450 
451 
452 
453 
454 
455 
455 
457 
458 
459 
460 
461 
462 
463 
464 
465 
466 
467 
468 
469 
470 
471 
472 
473 
474 
, 47 5 
476 
477 
478 
479 
480 
481 
^82 
483 
484 
485 
486 
487 
488 



SOURCE STATEMENT 



JNZ 
JMP 

LXI 



GTC05 
ERROR 

H , CADR 



DAD 


B 


DAD 


B 


MOV 


A,M 


INX 


H 


MOV 


H,M 


MOV 


L,A 


PCHL 





BRANCH IF NOT AT TABLE END 
ELSE, COMMAND CHARACTER IS ILLEGAL 
GTC10: 

IF GOOD COMMAND, LOAD ADDRESS OF TABLE 

/OF COMMAND ROUTINE ADDRESSES 

ADD WHAT IS LEFT OF LOOP COUNT 

ADD AGAIN - EACH ENTRY IN CADR IS 2 -BYTES LONG 

GET LSP OF ADDRESS OF TABLE ENTRY TO A 

POINT TO NEXT BYTE IN TABLE 

GET MSP OF ADDRESS OF TABLE ENTRY TO H 

PUT LSP OF ADDRESS OF TABLE ENTRY INTO L 

NEXT INSTRUCTION COMES FROM COMMAND ROUTINE 

********************************************************************** 



COMMAND IMPLEMENTING ROUTINES 



********************************************************************** 



FUNCTION* DCMD 

INPUTS* NONE 

OUTPUTS* NONE 

CALLS* ECHO,NMOUT,HILO,GETCM,CROUT,GETNM 

DESTROYS* A,B,C,D,E,H,L,F/F'S 

DESCRIPTION* DCMD IMPLEMENTS THE DISPLAY MEMORY (D) COMMAND 



DCMD: 



DCM05: 



DCM10: 



MVI 


C,2 


CALL 


GETNM 


POP 


D 


POP 


H 



CALL 



ADRD 



MVI 


c,' ' 


CALL 


ECHO 


MOV 


A,M 


CALL 


NMOUT 


CALL 


BREAK 


JC 


EXIT 


CALL 


HILO 


JC 


EXIT 


INX 


H 


MOV : 


A,L 


ANI 


NEWLN 


JNZ . 


DCM10 


CALL 


CROUT 


JMP 


DCM05 



GET TWO NUMBERS FROM INPUT STREAM 

ENDING ADDRESS TO DE 
STARTING ADDRESS TO HL 

DISPLAY ADDRESS 



USE BLANK AS SEPARATOR 

GET CONTENTS .OF NEXT MEMORY LOCATION 

DISPLAY CONTENTS 

SEE IF USER WANTS OUT 

IF SO, BRANCH TO EXIT 

SEE IF ADDRESS OF DISPLAYED LOCATION IS 

/GREATER THAN OR EQUAL TO ENDING ADDRESS 

EXIT IF NO MORE TO DISPLAY 

IF MORE TO GO, POINT TO NEXT LOC TO DISPLAY 

GET LOW ORDER BITS OF NEW ADDRESS 

SEE IF LAST HEX DIGIT OF ADDRESS DENOTES 

/START OF NEW LINE 

NO - NOT AT END OF LINE 

ECHO CARRIAGE RETURN/LINE FEED 

YES - START NEW LINE WITH ADDRESS 
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LOC OBJ 



01AB 


CD3D05 


01AE 


D2F901 


01BJ 


C5 


01B2 


7A 


01B3 


FE0D 


01B5 


CA0D02 


01B8 


0E2D 


01BA 


CD0705 


01BD 


CD3D05 


P1C0 


D22505 


01C3 


C5 


01C4 


El 


01C5 


22C57F 


01C8 


7A 


01C9 


FE0D 


01CB 


CAEA01 


01CE 


0E2D 


01D0 


CD0705 


01D3 


CD3D05 


01D6 


D2F601 



SEQ 

489 
490 
491 
492 
493 
494 
495 
496 
497 
498 
499 
500 
501 
502 
503 
504 
505 
506 
507 
508 
509 
510 
511 
512 
513 
514 
515 
516 
517 
518 
519 
520 
521 
522 
523 
524 
525 
526 
527 
528 
5 29 
530 
531 
532 
533 
534 
535 
536 
537 
538 
539 
540 
541 
542 
543 



SOURCE STATEMENT 



***************************************************************** 



FUNCTION: GCMD 

INPUTS: NONE 

OUTPUTS: NONE 

CALLS: ERROR, GETHX,RSTTF 

DESTROYS: A,B,C,D,E,H, L, F/F'S 

DESCRIPTION: GCMD IMPLEMENTS THE BEGIN EXECUTION (G ) COMMAND. 



************************************************************ 



GO TO <ADDRESS>, OPTIONALLY SET BREAKPOINTS. 

THE G COMMAND IS USED FOR TRANSFERRING CONTROL FROM THE 
MONITOR TO A USER PROGRAM. IT HAS SEVERAL MODES OF 
OPERATION. 

IF ONE HEXADECIMAL PARAMETER IS ENTERED, IT IS INTERPRETED 
AS THE ENTRY POINT OF THE USER PROGRAM AND A TRANSFER TO 
THAT LOCATION IS EXECUTED. 

IF ADDITIONAL (UP TO 2) PARAMETERS ARE ENTERED, THESE ARE 
CONSIDERED 'BREAKPOINTS', I.E., LOCATIONS WHERE CONTROL 
IS TO BE RETURNED TO THE MONITOR, IF THEY ARE ENCOUNTERED. 

IF THE FIRST PARAMETER IS NOT ENTERED, THE STORED VALUE 
OF THE USER'S PROGRAM COUNTER (REGISTER P) IS USED AS 
THE USER PROGRAM ENTRY POINT. 



GCMD: 



GCM03: 



CALL 


GETHX 


JNC 


GCM20 


PUSH 


B 


MOV 


A,D 


CPI 


CR 


JZ 


GCM30 


MVI 


C,'-' 


CALL 


ECHO 


CALL 


GETHX 


JNC 


ERROR 


PUSH 


B 


POP 


H 


SHLD 


BK1AD 


MOV 


A,D 


CPI 


CR 


JZ 


GCM05 


MVI 


c,'-' 


CALL 


ECHO 


CALL 


GETHX 


JNC 


GCM10 



GET ADDRESS (IF PRESENT) FROM INPUT STREAM 

BRANCH IF NO NUMBER PRESENT 

SAVE NEW PC VALUE 

GET TERMINATOR 

SEE OF CARRIAGE 

BRANCH IF NO OPTIONS 

SEND PROMT FOR BREAKPOINT ADDRESS 

SEND IT 

GET BREAKl 

NONE 

MOVE TO REG H-L 

VIA STACK 

SAVE BREAK 1 ADDRESS 

GET TERMINATOR 

ONLY ONE BREAK 

SEND PROMPT FOR BREAKPOINT ADDRESS 

SEND IT 

GET BREAK 2 
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LOC OBJ 

01D9 C5 
01DA El 
01DB 22C97F 
01DE 7A 
01DF FE0D 
0.1E1 C2F601 
01E4 7E 
01E5 32C87F 
01E8 36CF 

01EA 2AC57F 
01ED 7E 
01EE 32C47F 
01F1 36CF 
01F3 C30D02 

01F6 C32505 

01F9 2ABF7F 
01FC E5 
01FD 7A 
01FE FE2C 
0200 CAB801 
0203 FE20 
0205 CAB801 
0208 FE0D 
020A C22505 

020D AF 
020E El 
020F 22BF7F 
0212 C3FC06 

0215 210000 

0218 22C57F 

021B 22C97F 

021E C9 



021F 0E01 
0221 CD7105 
0224 3EFF 



SEQ 

544 

545 

546 

547 

548 

549 

550 

551 

552 

553 

554 

555 

556 

557 

558 

559- 

560 

561 

562 

563 

564 

565 

566 

567 

568 

569 

570 

571 

572 

573 

574 

57 5 

576 

577 

578 

579 

580 

581 

582 

583 

584 

585 

586 

587 

588 

589 

590 

591 

592 

593 

594 

595 

596 

597 

598 



SOURCE STATEMENT 



GCM05: 



GCM10: 



GCM20: 



GCM30: 



GCM40: 



PUSH 

POP 

SHLD 

MOV 

CPI 

JNZ 

MOV 

STA 

MVI 

LHLD 

MOV 

STA 

MVI 

JMP 

JMP 



B 

H 

BK2AD 

A,D 

CR 

GCM10 

A,M 

BK2BY 

M,RST1 

BK1AD 

A,M 

BK1BY 

M,RST1 

GCM30 

ERROR 



MOVE TO REG H-L 
VIA STACK 

SAVE BREAK 2 ADDRESS 
GET TERMINATOR 

MUST TERMINATE WITH CR CHAR 
GET BYTE AT BREAK 2 
SAVE BYTE FOR BREAK 2 
RESTART 1 INSTRUCTION 

BREAK 1 ADDRESS 
GET BYTE AT BREAK 1 
SAVE BYTE FOR BREAK 1 
RESTART 1 INSTRUCTION 
NOW ENTER GO 

; EXIT CLEAR BREAK RAM LOCATIONS" ON WAY 

; FETCH CURRENT PC AND USE IT 

IF NO STARTING ADDRESS, MAKE SURE THAT 
OR ALLOW A COMMA FOR BREAKPOINT ENTRY 
YES ASK FOR BREAKPOINTS 
BLANK IS ALSO GOOD 

/CARRIAGE RETURN TERMINATED COMMAND 
ERROR IF NOT 

RESET SINGLE STEP FLAG FOR GO CMD 

SET UP PSAVE VALUE BASED ON GO VALUE 
RESTORE REGISTERS AND BEGIN EXECUTION 

CLEAR REG H-L 

SAVE ADDRESS FOR BREAK 1 

SAVE ADDDRESS FOR BREAK 2 

RETURN 



***************************************************************** 



FUNCTION: ICMD 

INPUTS: NONE 

OUTPUTS: NONE 

CALLS: ERROR, ECHO, GETCH,VALDL,VALDG,CNVBN,STHLF,GETNM,CROUT 

DESTROYS: A,B,C ,D,E,H, L, F/F 'S 

DESCRIPTION: ICMD IMPLEMENTS THE INSERT CODE INTO MEMORY (I) COMMAND 



LHLD 


PSAVE ; 


PUSH 


H 


MOV 


A,D ; 


CPI 




JZ 


GCM03 


CPI 


1 1 . 


JZ 


GCM03 


CPI 


CR 


JNZ 


ERROR ; 


XRA 


A 


POP 


H 


SHLD 


PSAVE ; 


JMP 


RSTTF 


LXI 


H,0 


SHLD 


BK IAD ; 


SHLD 


BK2AD 


RET 





ICMD: 



MVI C,l 
CALL GETNM 
MVI A, UPPER 



GET SINGLE NUMBER FROM INPUT STREAM 
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LOC 


OBJ 


0226 


32C37F 


0229 


Dl 


022A 


CD3605 


022D 


CD0705 


0230 


79 


0231 


FE1B 


0233 


CA5F02 


0236 


CD6D07 


0239 


DA2A02 


023C 


CD5207 


023F 


D25902 


0242 


CDE204 


0245 


4F 


0246 


CD3307 


0249 


3AC37F 


024C 


B7 


024D 


C25102 


0250 


13 


0251 


EEFF 


0253 


32C37F 


0256 


C32A02 


0259 


CD2807 


025C 


C32505 



025F CD2807 
0262 C32A05 



0265 0E03 
0267 CD7105 
026A CI 
026B El 
026C Dl 

026D E5 
026E 62 
026F 6B 

0270 7E 

0271 60 

0272 69 

0273 77 



SEQ 

599 
600 
601 
602 
603 
604 
605 
606 
607 
608 
609 
610 
611 
612 
613 
614 
615 
616 
617 
618 
619 
620 
621 
622 
623 
624 
625 
626 
627 
628 
629 
630 
631 
632 
633 
634 
635 
636 
637 
638 
639 
640 
641 
642 
643 
644 
645 
646 
647 
648 
649 
650 
651 
652 
653 



ICM05: 



SOURCE STATEMENT 

STA TEMP ; TEMP WILL HOLD THE UPPER/LOWER HALF BYTE FLAG 

POP D ; ADDRESS OF START TO DE 

CALL GETCH ; GET A CHARACTER FROM INPUT STREAM 

CALL ECHO ; ECHO IT 

MOV A,C ; PUT CHARACTER BACK INTO A 

CPI TERM ; SEE IF CHARACTER IS A TERMINATING CHARACTER 

JZ ICM25 ; IF SO, ALL DONE ENTERING CHARACTERS 

CALL VALDL ; ELSE, SEE IF VALID DELIMITER 

JC ICM05 ; IF SO SIMPLY IGNORE THIS CHARACTER 

CALL VALDG ; ELSE, CHECK TO SEE IF VALID HEX DIGIT 

JNC ICM20 ; IF NOT, BRANCH TO HANDLE ERROR CONDITION 

CALL CNVBN ; CONVERT DIGIT TO BINARY 

MOV C,A ; MOVE RESULT TO C 

CALL STHLF ; STORE IN APPROPRIATE HALF WORD 

LDA TEMP ,- GET HALF BYTE FLAG 

ORA A ; SET F/F'S 

JNZ ICM10 ; BRANCH IF FLAG SET FOR UPPER 

INX D ; IF LOWER, INC ADDRESS OF BYTE TO STORE IN 

XRI INVRT ; TOGGLE STATE OF FLAG 

STA TEMP ; PUT NEW VALUE OF FLAG BACK 

JMP ICM05 ; PROCESS NEXT DIGIT 

CALL STHF0 ; ILLEGAL CHARACTER 

JMP ERROR ; MAKE SURE ENTIRE BYTE FILLED THEN ERROR 

CALL STHFB ; HERE FOR ESCAPE CHARACTER - INPUT IS DONE 

JMP EXIT 



ii**************************************************************** 



FUNCTION: MCMD 

INPUTS: NONE 

OUTPUTS: NONE 

CALLS: GETCM,HILO,GETNM 

DESTROYS: A, B ,C, D, E , H, L, F/F ' S 

DESCRIPTION: MCMD IMPLEMENTS THE MOVE DATA IN MEMORY (M) COMMAND. 



ICM10: 



ICM20: 



ICM25: 



MCMD: 



MCM05: 



MVI 

CALL 

POP 

POP 

POP 

PUSH 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 



C,3 
GETNM 

B 
H 
D 

H 

H,D 

L,E 

A,M 

H,B 

L,C 

M,A 



GET 3 NUMBERS FROM INPUT STREAM 
DESTINATION ADDRESS TO BC 
ENDING ADDRESS TO HL 
STARTING ADDRESS TO DE 

SAVE ENDING ADDRESS 

SOURCE ADDRESS TO HL 
GET SOURCE BYTE 

DESTINATION ADDRESS TO HL 
MOVE BYTE TO DESTINATION 
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LOC OBJ 



SEQ 



SOURCE STATEMENT 



0274 03 

0275 70 

0276 Bl 

0277 CA5401 
027A 1? 
027B El 
027C CDB605 
027F D25401 
0282 C36D02 



0285 CDF604 
0288 3EFF 
028A C3FC06 



028D CD3605 
0290 CD0705 

0293 79 

0294 FE0D 
0296 C22505 

0299 CDF306 
029CFE3A 
029E C29902 
02A1 AF 
02A2 57 
02A3 CDBD04 
02A6 CA5401 
02A9 5F 
02AA CDBD04 



654 
655 
656 
657 
658 
659 
660 
661 
662 
663 
664 
665 
666 
667 
668 
66S 
670 
671 
672 
673 
674 
675 
676 
677 
678 
679 
680 
681 
682 
683 
684 
685 
686 
687 
688 
689 
690 
691 
692 
693 
694 
695 
696 
697 
698 
699 
700 
701 
702 
703 
704 
7P5 
706 
707 
708 



INX 


B 


MOV 


A,B 


ORA 


C 


JZ 


GETCM 


INX 


D 


POP 


H 


CALL 


HILO 


JNC 


GETCM 


JMP 


MCM05 



INCREMENT DESTINATION ADDRESS 

TEST FOR DESTINATION ADDRESS OVERFLOW 

IF SO, CAN TERMINATE COMMAND 

INCREMENT SOURCE ADDRESS 

ELSE, GET BACK ENDING ADDRESS 

SEE IF ENDING ADDR>=SOURCE ADDR 

IF NOT, COMMAND IS DONE 

MOVE ANOTHER BYTE 



it*************************************************************** 



FUNCTION: NCMD 

INPUTS: NONE 

OUTPUTS: NONE 

CALLS: CROUT 

DESTROYS: A 

DESCRIPTION: NCMD IMPLEMENTS THE SINGLE STEP (N) COMMAND 



NCMD: 



CALL 
MVI 

JMP 



CROUT 

A,00EFH 
RSTTF 



ECHO CR/LF 

SET SINGLE STEP FLAG 

RESTORE REGISTERS AND EXECUTE NEXT INST. 



***************************************************************** 



• R 



READ HEXADECIMAL TAPE 



FUNCTION* RCMD 
INPUTS* NONE 
OUTPUTS* NONE 

CALLS* GETCH,ECHO, CO, RICH, BYTE 
DESTROYS* A,B,C,D,E,H,L,F/F'S 

DESCRIPTION* RCMD IMPLEMENTS THE READ HEXADECIMAL TAPE (R) 
COMMAND. 



RCMD: 



RCM05: 



CALL 


GETCH ; 


CALL 


ECHO 


MOV 


A,C 


CPI 


CR 


JNZ 


ERROR 


CALL 


RICH 


CPI 


i.i 


JNZ 


RCM05 ,' 


XRA 


A 


MOV 


D,A 


CALL 


BYTE 


JZ 


GETCM 


MOV 


E,A 


CALL 


BYTE 



GET CARRIAGE RETURN CHARACTER 

ECHO IT 

MOVE IT TO A REGISTER 

SEE IF CARRIAGE RETURN 

ERROR IF NOT PROPERLY TERMINATED 

READ CHARACTER FROM TAPE 

SEE IF RECORD MARK 

TRY AGAIN IF NOT MARK 

ZERO A REGISTER 

INITIALIZE D FOR HOLDING THE CHECKSUM 

READ TWO CHARACTERS FROM TAPE 

IF ZERO RECORD LENGTH, ALL DONE 

OTHERWISE, PUT THE RECORD LENGTH IN E 

GET MSB OF LOAD ADDRESS 
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LOC OBJ 

02AD 67 
02AE CDBD04 
02B1 6F 
02B2 CDBD04 
02B5 4B 

P2B6 CDBD04 
02B9 77 
02BA 23 
02BB ID 
02BC C2B602 
02BF CDBD04 
02C2 C22505 
02C5 C39902 



02C8 2ABF7F 
02GB CD3D05 
02CE D2D302 

02D1 .C5 
02D2 El 

02D3 7A 
02D4 FE20 
02D6 CADE02 
02D9 FE2C 
02DB C22505 

02DE 7E 
02DF CDD4 05 
02E2 0E2D 
02E4 CD0705 
02E7 CD3D05 
02EA D2EE02 
02ED 71 

02EE 7A 
02EF FE0A 
02F1 C20D03 
02F4 2B 
02F5 0E0D 



SEQ 

709 
710 
711 
712 
713 
714 
715 
716 
717 
718 
719 
720 
721 
722 
723 
724 
725 
726 
727 
728 
729 
730 
731 
732 
733 
734 
735 
736 
737 
738 
739 
740 
741 
742 
743 
744 
745 
746 
747 
748 
749 
750 
751 
752 
753 
754 
755 
756 
757 
758 
759 
760 
761 
762 
763 



SOURCE STATEMENT 



RCM10: 



MOVE TO H 

GET LSB OF LOAD ADDRESS 

MOVE TO L 

GET RECORD TYPE 

MOVE RECORD LENGTH TO C 

READ DATA FROM TAPE 
PUT DATA INTO MEMORY 
INCREMENT HL FOR NEXT LOCATION 
DECREMENT RECORD LENGTH 
LOOP UNTIL DONE 
READ CHECKSUM FROM TAPE 
CHECKSUM ERROR IF NOT ZERO 
GET ANOTHER RECORD 



****************************************************************** 
.S - SUBSTITUTE INTO MEMORY 

FUNCTION* SCMD 

INPUTS* NONE 

OUTPUTS* NONE 

CALLS* GETHX,GETCM,NMOUT,ECHO 

DESTROYS* AjBjCjDjEjH^F/F'S 

DESCRIPTION* SCMD IMPLEMENTS THE SUBSTITUTE INTO MEMORY (S) COMMAND. 



MOV 


H,A 


CALL 


BYTE 


MOV 


L,A 


CALL 


BYTE 


MOV 


C,E 


CALL 


BYTE 


MOV 


M,A 


INX 


H 


DCR 


E 


JNZ 


RCM10 


CALL 


BYTE 


JNZ 


ERROR 


JMP 


RCM05 



SCMD: 



SCM03: 



SCM05: 



SCM10: 



SCM20: 



LHLD PSAVE ; ASSUME A VALUE FOR S 

CALL GETHX ; GET A NUMBER, IF PRESENT, FROM INPUT 

JNC SCM05 ; IS NUMBER PRESENT 

PUSH B ; ADDRESS ENTERED BY USER 

POP H ; GET NUMBER TO HL - DENOTES MEMORY LOCATION 

MOV A,D ; GET TERMINATOR 

CPI ' ' ; SEE IF SPACE 

JZ SCM10 ; YES - CONTINUE PROCESSING 

CPI ',■ ; ELSE, SEE IF COMMA 

JNZ ERROR ; NO - TERMINATE COMMAND 

MOV A,M ; GET CONTENTS OF SPECIFIED LOCATION TO A 

CALL NMOUT ; DISPLAY CONTENTS ON CONSOLE 

MVI C , ' - ' ; 

CALL ECHO ; USE DASH FOR SEPARATOR 

CALL GETHX ; GET NEW VALUE FOR MEMORY LOCATION, IF ANY 

JNC SCM20 ; IF NO VALUE PRESENT, BRANCH 

MOV M,C ; ELSE, STORE LOWER 8 BITS OF NUMBER ENTERED 

MOV A,D ; GET TERMINATOR 

CPI LF ; SEE IF LINE FEED 

JNZ SCM25 ; NO CONTINUE 

DCX H ; YES WE WILL BACK UP ADDRESS 

MVI C,CR ; CARRIAGE RETURN PLEASE 
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LOC 


OBJ 


02F7 


CDEB04 


02FA 


0E00 


2FC 


CDEB04 


02FF 


CDEB04 


0302 


CD0D06 


0305 


0E20 


0307 


CD0705 


030A 


C3DE02 


030D 


FE0D 


030F 


CA5401 


0312 


23 


0313 


C3DE02 



0316 0E02 
0318 CD7105 
031B CDC805 
031E Dl 
03 IF El 

0320 7D 

0321 C610 

0323 4F 

0324 7C 

0325 CE00 

0327 47 

0328 7B 

0329 91 
032A 4F 
032B 7A 
032C 98 
032D DA3503 

0330 3E10 
0332 C33803 

0335 79 

0336 C611 

0338 B7 

0339 CA6503 
033C D5 



SEQ 

764 
765 
766 
767 
768 
769 
770 
771 
772 
773 
774 
775 
776 
777 
778 
779 
780 
781 
782 
783 
784 
785 
786 
787 
788 
789 
790 
791 
792 
793 
794 
795 
796 
797 
798 
799 
800 
801 
802 
803 
804 
805 
806 
807 
808 
809 
810 
811 
812 
813 
814 
815 
816 
817 
818 



SOURCE STATEMENT 



PRINT IT ONLY 

NULL CHAR FOR TTY DELAY TIME 

SEND IT 

TWO WILL BE JUST FINE 

ECHO ADDRESS 

SPACE FOR LOOKS PLEASE 

ECHO IT 

NOW WE HAVE BACKED UP ONE LETS CONTINUE 

; SEE IF CR, THE PROPER TERMINATING CHARACTER 

; NO, MUST BE * ' OR ' , ' 



***************************************************************** 



SCM2 5: 



CALL 


CO 


MVI 


C,00 


CALL 


CO 


CALL 


CO 


CALL 


PADR 


MVI 


C ' 


CALL 


ECHO 


JMP 


SCM10 


CPI 


CR 


JZ 


GETCM 


INX 


H 


JMP 


SCM10 



.w 



WRITE HEXADECIMAL TAPE 



FUNCTION* WCMD 
INPUTS* NONE 
OUTPUTS* NONE 

CALLS* GETNM , LEAD, PO, PBYTE , PADR , PEOL, PEOF 
DESTROYS* A,B,C,D,E,H,L,F/F'S 

DESCRIPTION* WCMD IMPLEMENTS THE WRITE HEXADECIMAL TAPE (W) 
COMMAND. 



WCMD : 



WCM05: 



WCM3 0: 



WCM15: 



MVI 

CALL 

CALL 

POP 

POP 

MOV 

ADI 

MOV 

MOV 

ACI 

MOV 

MOV 

SUB 

MOV 

MOV 

SBB 

JC 

MVI 

JMP 

MOV 
ADI 

ORA 

JZ 

PUSH 



C,2 

GETNM 
LEAD 
D 
H 

A,L 

16 

C,A 

A,H 



B,A 

A,E 

C 

C,A 

A,D 

B 

WCM10 

A, 16 

WCM15 

A,C 
17 

A 

WCM25 

D 



GET 2 NUMBERS FROM INPUT STREAM 

PUNCH 60 NULL CHARACTERS FOR TAPE LEADER 

ENDING ADDRESS TO DE 

STARTING ADDRESS TO HL 

MOVE L TO A 

INCREMENT THE LSB OF STARTING ADDRESS BY 1 6 

MOVE RESULT TO C 

MOVE H TO A 

ADD CARRY IN FROM PREVIOUS OPERATION 

SAVE RESULT IN B 

NOW MOVE LSB OF ENDING ADDRESS TO A 

SUBTRACT LSB OF STARTING ADDRESS 

SAVE IN C 

NOW GET MSB OF ENDING ADDRESS IN A 

SUBTRACT MSB OF STARTING ADDRESS 

BRANCH IF THE RECORD LENGTH IS NOT 16 

OTHERWISE SET A TO RECORD LENGTH OF 16 

NOW BRANCH TO PUNCH THE RECORD 

THIS IS THE LAST RECORD 

SO SET A TO REMAINING DATA LENGTH 

CHECK FOR RECORD LENGTH OF ZERO 

IF IT IS, ALL DONE 

OTHERWISE, SAVE ENDING ADDRESS 
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LOC OBJ 

033D 5F 
033E 1600 
0340 0E3A 
0342 CDEB04 

0345 7B 

0346 CD1606 

0349 CD0D06 
034C AF 
034D CD1606 

0350 7E 

0351 CD1606 

0354 23 

0355 ID 

0356 C25003 
0359 AF 
035A 92 
035B CD1606 
035E Dl 
035F CD4B06 
0362 C32003 

0365 CD2D06 
0368 C32A05 



036B CD3605 
036E CD0705 

0371 79 

0372 FE0D 
0374 C27D03 
0377 CD6006 
037A C35401 

037D 4F 
037E CDAA06 

0381 C5 

0382 El 

0383 0E20 
0385 CD0705 

0388 79 

0389 32C37F 



SEQ 

819 
820 
821 
822 
823 
824 
825 
826 
827 
828 
829 
830 
831 
832 
833 
834 
835 
836 
837 
838 
839 
840 
841 
842 
843 
844 
845 
846 
847 
848 
849 
850 
851 
852 
853 
854 
855 
856 
857 
858 
859 
860 
861 
862 
863 
864 
865 
866 
867 
868 
869 
870 
871 
872 
873 



SOURCE STATEMENT 



WCM20: 



WCM25: 



MOV 


E,A 


MVI 


D,0 


MVI 


C, ■ : ■ 


CALL 


PO 


MOV 


A,E 


CALL 


PBYTE 


CALL 


PADR 


XRA 


A 


CALL 


PBYTE 


MOV 


A,M 


CALL 


PBYTE 


INX 


H 


DCR 


E 


JNZ 


WCM20 


XRA 


A 


SUB 


D 


CALL , 


PBYTE 


POP 


D 


CALL 


PEOL 


JMP 


WCM05 


CALL 


PEOF 


JMP 


EXIT 



PUT RECORD LENGTH IN E 
INITIALIZE D FOR HOLDING CHECKSUM 

PUNCH RECORD MARK CHARACTER 

PUT RECORD LENGTH IN A 

PUNCH RECORD LENGTH 

PUNCH STARTING ADDRESS 

ZERO A 

PUNCH RECORD TYPE 

GET DATA TO BE PUNCHED FROM MEMORY 

PUNCH IT 

INCREMENT MEMORY ADDRESS 

DECREMENT LENGTH COUNT 

LOOP UNTIL ALL DATA PUNCHED 

PUNCH CHECKSUM 

RESTORE ENDING ADDRESS 

PUNCH CARRIAGE RETURN AND LINE FEED 



PUNCH END OF FILE RECORD 
ALL DONE 



****** 1s********************************************************** 

.X - EXAMINE REGISTERS AND CHANGE 

FUNCTION* XCMD 
INPUTS* NONE 
OUTPUTS* NONE 

CALLS* GETCH, ECHO, REGDS,GETCM, ERROR, RGADR,NMOUT,CROUT,GETHX 
DESTROYS* A,B,C,D,E,H,L,F/F'S 

DESCRIPTION* XCMD IMPLEMENTS THE REGISTER EXAMINE AND CHANGE (X) 
COMMAND. 



XCMD: 



XCM05: 



CALL 


GETCH 


CALL 


ECHO 


MOV 


A,C 


CPI 


CR 


JNZ 


XCM0 5 


CALL 


REGDS 


JMP 


GETCM 


MOV 


C,A 


CALL 


RGADR 


PUSH 


B 


POP 


H 


MVI 


C ' 


CALL 


ECHO 


MOV 


A,C 


STA 


TEMP 



GET REGISTER IDENTIFIER 
ECHO IT 



BRANCH IF NOT CARRIAGE RETURN 
ELSE, DISPLAY REGISTER CONTENTS 
THEN TERMINATE COMMAND 

GET REGISTER IDENTIFIER TO C 

CONVERT IDENTIFIER INTO RTAB TABLE ADDR 

PUT POINTER TO REGISTER ENTRY INTO HL 

ECHO SPACE TO USER 

PUT SPACE INTO TEMP AS DELIMITER 
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SOURCE STATEMENT 



038C 


3AC37F 


038F 


FE20 


0391 


CA9903 


0394 


FE2C 


0396 


C25401 


0399 


7E 


039A 


B7 


039B 


CA2A05 


039E 


E5 


039F 


5E 


03A0 


167F 


03A2 


23 


03A3 


46 


03A4 


D5 


03A5 


D5 


03A6 


El 


03A7 


C5 


03A8 


7E 


03A9 


CDD4 05 


03AC 


Fl 


03AD 


F5 


03AE 


B7 


03AF 


CAB703 


03B2 


2B 


03B3 


7E 


03B4 


CDD4 05 


03B7 


0E2D 


03B9 


CD0705 


03BC 


CD3D05 


03BF 


D2D703 


03C2 


7A 


03C3 


32C37F 


03C6 


Fl 


03C7 


El 


03C8 


B7 


03C9 


CACE03 


0?CC 


70 


03CD 


2B 


03CE 


71 


03CF 


110300 


03D? 


El 


03D3 


19 


03D4 


C38C03 


03D7 


7A 


03D8 


32C37F 


03DB 


Dl 


03DC 


Dl 


03DD 


C3CF03 



874 XCM10: 






875 


LDA 


TEMP 


876 


CPI 


t i 


877 


JZ 


XCM15 


878 


CPI 


i t 
t 


879 


JNZ 


GETCM 


880 XCM15: 






881 


MOV 


A,M 


882 


ORA 


A 


883 


JZ 


EXIT 


884 


PUSH 


H 


885 


MOV 


E,M 


886 


MVI 


D.HREGS 


887 


INX 


H 


888 


MOV 


B,M 


889 


PUSH 


D 


890 


PUSH 


D 


891 


POP 


H 


892 


PUSH 


B 


893 


MOV 


A,M 


894 


CALL 


NMOUT 


895 


POP 


PSW 


896 


PUSH 


PSW 


897 


ORA 


A 


898 


JZ 


XCM20 


899 


DCX 


H 


900 


MOV 


A,M 


901 


CALL 


NMOUT 


902 XCM20: 






903 


MVI 


C,'-' 


904 


CALL 


ECHO 


905 


CALL 


GETHX 


906 


JNC 


XCM35 


907 


MOV 


A,D 


908 


STA 


TEMP 


909 


POP 


PSW 


910 


POP 


H 


911 


ORA 


A 


912 


JZ 


XCM25 


913 


MOV 


M,B 


914 


DCX 


H 


915 XCM25: 






916 


MOV 


M,C 


917 XCM30: 






918 


LXI 


D,RTABS 


919 


POP 


H 


920 


DAD 


D 


921 


JMP 


XCM10 


922 XCM35: 






923 


MOV 


A,D 


924 


STA 


TEMP 


925 


POP 


D 


926 


POP 


D 


927 


JMP 


XCM30 


928 ; 







GET TERMINATOR 

SEE IF A BLANK 

YES - GO CHECK POINTER INTO TABLE 

NO - SEE IF COMMA 

NO - MUST BE CARRIAGE RETURN TO END COMMAND 



SET F/F'S 

BRANCH IF AT END OF TABLE 

PUT POINTER ON STACK 

FETCH ADDRESS OF SAVE LOCATION FROM 

/TABLE 

FETCH LENGTH FLAG FROM TABLE 

SAVE ADDRESS OF SAVE LOCATION 

MOVE ADDRESS TO HL 

SAVE LENGTH FLAG 

GET 8 BITS OF REGISTER FROM SAVE LOCATION 

DISPLAY IT 

GET BACK LENGTH FLAG 

SAVE IT AGAIN 

SET F/F'S 

IF 8 BIT REGISTER, NOTHING MORE TO DISPLAY 

ELSE, FOR 16 BIT REGISTER, GET LOWER 8 BITS 

DISPLAY THEM 



USE DASH AS SEPARATOR 

SEE IF THERE IS A VALUE TO PUT INTO REGISTER 

NO - GO CHECK FOR NEXT REGISTER 

ELSE, SAVE THE TERMINATOR FOR NOW 

GET BACK LENGTH FLAG 

PUT ADDRESS OF SAVE LOCATION INTO HL 

SET F/F'S 

IF 8 BIT REGISTER, BRANCH 

SAVE UPPER 8 BITS 

POINT TO SAVE LOCATION FOR LOWER 8 BITS 

STORE ALL OF 8 BIT OR LOWER 1/2 OF 16 BIT REG 

SIZE OF ENTRY IN RTAB TABLE 
POINTER INTO REGISTER TABLE RTAB 
ADD ENTRY SIZE TO POINTER 
DO NEXT REGISTER 

GET TERMINATOR 

SAVE IN MEMORY 

CLEAR STACK OF LENGTH FLAG AND ADDRESS 

/OF SAVE LOCATION 

GO INCREMENT REGISTER TABLE POINTER 
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LOC OBJ 



03E0 


CD9106 


03E3 


PE49 


03E5 


CD0705 


03E8 


0E38 


03EA 


CD0705 


3ED 


0E35 


03EF 


CD0705 


03F2 


0E3D 


03F4 


CD0705 


03F7 


20 


03F8 


CDD405 


03FB 


3E0F 


3FD 


30 


03FE 


C32904 



0401 CD9106 
0404 0E49 



SEQ 

929 
930 
931 
932 
933 
934 
935 
936 
937 
938 
939 
940 
941 
942 
943 
944 
945 
946 
947 
948 
949 
950 
951 
952 
953 
954 
955 
956 
957 
958 
959 
960 
961 
962 
963 
964 
965 
966 
967 
968 
969 
970 
971 
972 
973 
974 
975 
976 
977 
978 
979 
980 
981 
982 
98 3 



SOURCE STATEMENT 



***************************************************************** 



INTERRUPT SERVICE ROUTINES 



***************************************************************** 



********************************************************************** 



FUNCTION: INTIN 

INPUTS: NONE 

OUTPUTS: NONE 

CALLS: REGSV, ECHO, NMOUT, REGDS 

DESTROYS: A,B,C 

DESCRIPTION: INTIN HANDLES INTERRUPTS CAUSED BY ACTIVE SIGNALS ON 

TRAP, RST 6.5, AND RST 5.5, IF THEY ARE NOT HANDLED BY 
THE USER. IT PRINTS THE INTERUPT MASK, NEXT INSTRUCTION 
AND REGISTER VALUES. 



INTIN: 



CALL 

MVI 

CALL 

MVI 

CALL 

MVI 

CALL 

MVI 

CALL 

RIM 

CALL 

MVI 

SIM 

JMP 



REGSV 
C,'I' 
ECHO 
C, '8* 
ECHO 
C, '5' 
ECHO 
C,' = ' 
ECHO 

NMOUT 
A,TMDIS 

FND20 



SAVE ALL USERS REGISTERS 

OUTPUT INTERRUPT MESSAGE 'I85M=#' 



GET 8085 MASK BYTE 

RESET ALL MASK INTERRUPTS 
RESET ALL MASK INTERRUPTS 
FINISH EXIT 



********************************************************************** 

FUNCTION: INTIN9 

INPUTS: NONE 

OUTPUTS: NONE 

CALLS: REGSV, ECHO, NMOUT, REGDS 

DESTROYS: A,B,C 

DESCRIPTION: INTIN9 HANDLES ANY INTERRUPT REQUESTED BY THE 8259 IF 
IT IS NOT HANDLED BY THE USER. IT PRINTS THE INTERRUPT 
MASK, NEXT INSTRUCTION, AND REGISTER VALUES. 



INTIN9: 



CALL REGSV ; SAVE ALL USERS REGISTERS 
MVI C,'I' 
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LOC OBJ 

0406 CD0705 

0409 0E3D 
040B CD0705 
040E 3E0B 

0410 D3DA 
0412 DBDA 
0414 0608 
0416 0E00 

0418 IF 

0419 DA2104 
041C 0C 
041D 05 
041E C21804 

0421 3E20 

04 23 D3DA 

0425 79 . 

0426 CDD405 

0429 CDF60<1 
(M2C C37F04 



042F 2AC57F 

0432 7C 

0433 B5 

0434 CA3B04 
0437 3AC47F 
043A 77 

B43B 2AC97F 
04 3E 7C 
043F B5 
0440 CA4704 
0443 3AC87F 

0446 77 

0447 CD1502 
044A 2ABF7F 
044D 2B 
044E 22BF7F 
0451 0E23 
0453 CD0705 
0456 C38204 



SEQ 

984 

985 

986 

987 

988 

989 

990 

991 

992 

993 

994 

995 

996 

997 

998 

999 

1000 

1001 

1002 

1003 

1004 

1005 

1006 

1007 

1008 

1009 

1010 

1011 

1012 

1013 

1014 

1015 

1016 

1017 

1018 

1019 

1020 

1021 

1022 

1023 

1024 

102 5 

1026 

1027 

1028 

1029 

1030 

1031 

1032 

1033 

1034 

1035 

1036 

1037 

1038 



SOURCE STATEMENT 



FINTN: 



FNDI: 



FND20: 



CALL 

MVI 

CALL 

MVI 

OUT 

IN 

MVI 

MVI 

RAR 

JC 

INR 

DCR 
JNZ 

MVI 
OUT 
MOV 
CALL 

CALL 
JMP 



ECHO 
C,' = ' 

ECHO 

A,OCW3 

ICCP 

ICCP 

B,8 

C,0 



FNDI 
C 
B 
FINTN 

A,EOIC 
ICCP 
A,C 
NMOUT 

CROUT 
STP05 



OUTPUT INTERRUPT MESSAGE 'I=#' 



READ INTERRUPT 'IN SERVICE" REGISTER 



SET UP TO FIND INTERRUPT NUMBER 



ROTATE TO CHECK INTERRUPT 'IS' BIT 
EXIT IF # FOUND 

TRY AGAIN 



END OF INTERRUPT 

MOVE FOR OUTPUT CONVERSION 
PRINT INTERRUPT # 

; CARRIAGE RETURN - LINE FEED 
; FINISH AND EXIT 



********************************************************************** 



GOBK1: 



GOBK10: 



GOBK20: 



LHLD 

MOV 

ORA 

JZ 

LDA 

MOV 

LHLD 

MOV 

ORA 

JZ 

LDA 

MOV 

CALL 

LHLD 

DCX 

SHLD 

MVI 

CALL 

JMP 



BK1AD 

A,H 

L 

GOBK10 

BK1BY 

M,A 

BK2AD 

A,H 

L 

GOBK20 

BK2BY 

M,A 

GCM40 

PSAVE 

H 

PSAVE 

C, '#' 

ECHO 

STP10 



GET BREAK 1 ADDRESS 

TEST FOR ZERO 
NO BREAK ONE 
GET BYTE SAVED 
RESTORE USER RAM 

GET BREAK 2 ADDRESS 

TEST FOR ZERO 
NO BREAK TWO 
GET BYTE SAVED 
RESTORE USER RAM 

CLEAR BREAK ADDRESS LOCATIONS 

GET USER P REG 

DEC IT PLEASE 

NOW IT SHOULD BE CORRECT 

PRINT # CHAR 

GO AND DISPLAY ADDRESS AT BREAK 



********************************************************************** 



FUNCTION* STEPIN 
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LOC OBJ 



0459 


CD9106 


045C 


3E0F 


045E 


30 . 


045F 


3AC07F 


0462 


A7 


04 63 


C27F04 


0466 


3ABF7F 


0469 


FE40 


046B 


D27F04 


046E 


2AC17F 


0471 


5E- 


0472 


23 


0473 


56 


0474 


23 


0475 


22C17F 


0478 


EB 


0479 


22BF7F 


047C 


C39C04 



047F CD6006 

0482 2ABF7F 
0485 CD9304 
0488 0E20 
048A CD0705 
048D CDE705 
0490 C35401 



SEQ 

1039 

1040 

1041 

1042 

104 3 

1044 

1045 

1046 

1047 

1048 

1049 

1050 

1051 

1052 

1053 

1054 

1055 

1056 

1057 

1058 

1059 

1060 

1061 

1062 

1063 

1064 

1065 

1066 

1067 

1068 

1069 

1070 

]071 

1072 

1073 

1074 

1075 

1076 

1077 

1078 

1079 

1080 

1081 

1082 

1083 

1084 

1085 

1086 

1087 

1088 

1089 

1090 

1091 

1092 

1093 



SOURCE STATEMENT 

INPUTS* NONE 

OUTPUTS* NONE 

CALLS* REGSV,REGDS,NXTIN 

DESTROYS* A,F/F'S 

DESCRIPTION* STEPIN OUTPUTS DATA AFTER SINGLE STEP TIMER INTERRUPT 



STEPIN: 



SAVE ALL REGISTERS ON ENTRY 

STOP INTERRUPTS 

RESET ALL MASK INTERRUPTS 

TEST FOR SINGLE STEP INTO BREAKPOINT 

PC HIGH=0 FOR BREAKPOINT ADDRESS 

PC LOW < RST FOR BREAKPOINT ADDRESS 
CONTINUE IF NO USER BREAKPOINT 
GET USER STACK POINTER 
RESTORE ADDRESS OF USER BREAKPOINT 



UPDATE USER STACK POINTER 
GET BREAKPOINT ADDRESS INTO HL 
UPDATE USER P COUNTER 
PRINT BREAKPOINT ENTRY 

OUTPUT REGISTERS 

LOAD USER P COUNTER 

DISPLAY ADDRESSS 

SPACE 

PRINT IT 

OUTPUT 3 BYTES FOR NEXT INSTRUCTION 



***************************************************************** 



STP05: 



STP10: 



CALL 

MVI 

SIM 

LDA 

ANA 

JNZ 

LDA 

CPI 

JNC 

LHLD 

MOV 

INX 

MOV 

INX 

SHLD 

XCHG 

SHLD 

JMP 

CALL 



REGSV 
A,TMDIS 

PSAVE+1 

A 

STP05 

PSAVE 

LLOW 

STP05 

SSAVE 

E,M 

H 

D,M 

H 

SSAVE 

PSAVE 
ADROUT 

REGDS 



LHLD 


PSAVE 


CALL 


ADRD 


MVI 


C,' ' 


CALL 


ECHO 


CALL 


NXTIN 


JMP 


GETCM 



UTILITY ROUTINES 



***************************************************************** 



***************************************************************** 



FUNCTION* ADRD 

INPUTS* HL - ADDRESS TO BE DISPLAYED 

OUTPUTS* NONE 

CALLS* NMOUT 

DESTROYS* A 

DESCRIPTION* ADRD OUTPUTS TO THE CONSOLE THE ADDRESS 



ISIS-II 8080/8( 
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LOC OBJ 



0493 7C 

0494 CDD405 

0497 7D 

0498 CDD405 
049B C9 
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049C 0E23 
049E CD0705 
04A1 2ABF7F 
04A4 CD9304 
04A7 C32A05 



04AA DBED 
04AC E602 
04AE CA3305 
04B1 DBEC 
04B3 E67F 
04B5 FE1B 
04B7 CA2607 
04BA C33305 



SEQ 

1094 
1095 
1096 
1097 
1098 
1099 
1100 
1101 
1102 
1103 
1104 
1105 
1106 
1107 
1108 
1109 
1110 
1111 
1112 
1113 
1114 
1115 
1116 
1117 
1118 
1119 
1120 
1121 
1122 
1123 
1124 
1125 
1126 
1127 
1128 
1129 
1130 
1131 
1132 
1133 
1134 
1135 
1136 
1137 
1138 
1139 
1140 
1141 
1142 
1143 
1144 
1145 
1146 
1147 
1148 



ADRD: 



MOV 


A,H 


CALL 


NMOUT 


MOV 


A,L 


CALL 


NMOUT 


RET 





SOURCE STATEMENT 

CONTAINED IN THE H,L REGISTERS. 

DISPLAY FIRST HALF OF ADDRESS 
DISPLAY SECOND HALF OF ADDRESS 
RETURN TO CALLING ROUTINE 

******************************************* ********************** 



FUNCTION* ADROUT 

INPUTS* USER REGISTERS ON THE STACK 
OUTPUTS* NOTHING 
CALLS* ECHO, ADRD 
DESTROYS* A,B,C,D,E,H,L,F/F'S 

DESCRIPTION* ADROUT OUTPUTS THE USER P COUNTER TO THE CONSOLE 
AFTER AN RST 1 INSTRUCTION. 



ADROUT : 



MVI 

CALL 

LHLD 

CALL 

JMP 



C,'#« 
ECHO 
PS AVE 
ADRD 

EXIT 



OUTPUT ■#' 
LOAD USER P COUNTER 
DISPLAY ADDRESS 
GET NEW COMMAND 



***************************************************************** 



FUNCTION: BREAK 

INPUTS: NONE 

OUTPUTS: CARRY - 1 IF EXCAPE CHARACTER INPUT 

- IF ANY OTHER CHARACTER OR NO CHAR PENDING 

CALLS: NOTHING 

DESTROYS: A,F/F'S 

DESCRIPTION: BREAK IS USED TO SENSE AN ESCAPE CHARACTER FROM 
THE USER. IF NO CHARACTER IS PENDING, OR IF THE 
PENDING CHARACTER IS NOT THE EXCAPE, THEN A FAILURE 
RETURN (CARRY=0) IS TAKEN. IN THIS CASE, THE 
PENDING CHARACTER (IF ANY) IS LOST. IF THE PENDING 
CHARACTER IS AN EXCAPE CHARACTER, BREAK TAKES A SUCCESS 
RETURN (CARRY-1). 



BREAK: 



IN 


CONST 


AN I 


RBR 


JZ 


FRET 


IN 


CNIN 


ANI 


PRTY0 


CPI 


ESC 


JZ 


SRET 


JMP 


FRET 



GET CONSOLE STATUS 

SEE IF CHARACTER PENDING 

NO - TAKE FAILURE RETURN 

YES - PICK UP CHARACTER 

STRIP OFF PARITY BIT 

SEE IF BREAK CHARACTER 

YES - SUCCESS RETURN 

NO - FAILURE RETURN - CHARACTER LOST 



ISIS-II 8080/8085 MACRO ASSEMBLER, V2.0 
04/24/78 



MODULE 



PAGE 



22 



LOC OBJ 



04BD 


C5 


04BE 


CDF306 


04C1 


4F 


04C2 


CDE204 


04C5 


07 


04C6 


07 


B4C7 


07 


04C8 


07 


04C9 


47 


04CA 


CDF306 


04CD 


4F 


04CE 


CDE204 


4D1 


B0 


04D2 


4F 


04D3 


82 


04D4 


57 


04D5 


79 


04D6 


CI 


04D7 


C9 



SEQ 

1149 

1150 

1151 

1152 

1153 

1154 

1155 

1156 

1157 

1158 

1159 

1160 

1161 

1162 

1163 

1164 

1165 

1166 

1167 

1168 

1169 

1170 

1171 

1172 

1173 

1174 

1175 

1176 

1177 

1178 

1179 

1180 

1181 

1182 

1183 

1184 

1185 

1186 

1187 

1188 

1189 

1190 

1191 

1192 

1193 

1194 

1195 

1196 

1197 

1198 

1199 

1200 

1201 

1202 

1203 



SOURCE STATEMENT 



***************************************************************** 



FUNCTION* BYTE 

INPUTS* D - CURRENT VALUE OF CHECKSUM 

OUTPUTS* A - HEXADECIMAL CHARACTER 

D - UPDATED VALUE OF CHECKSUM 

Z FLAG - SET IF (D) =0, CLEARED IF (D) <> 
CALLS* RICH,CNVBN 
DESTROYS* A,B,C,D, F/F'S 
DESCRIPTION* BYTE READS 2 ASCII CHARACTERS FROM THE TELETYPEWRITER 

AND CONVERTS THE CHARACTERS TO ONE HEXADECIMAL CHARACTER. 

THE A REGISTER CONTAINS THE FINAL CHARACTER AND THE 

D REGISTER CONTAINS THE UPDATED VALUE OF 

THE CHECKSUM. 



BYTE: 



SAVE BC 

READ ASCII CHARACTER FROM TAPE 

CONVERT CHARACTER TO HEXADECIMAL 
POSITION VALUE INTO UPPER 4 BITS 



SAVE RESULTS IN B 

GET ANOTHER CHARACTER FROM TAPE 

CONVERT IT 

OR IN THE UPPER 4 BITS 

SAVE 

INCREMENT CHECKSUM 

RESTORE HEX DATA TO A REGISTER 
RESTORE BC 



***************************************************************** 

FUNCTION* CI 

INPUTS* NONE 

OUTPUTS* A - CHARACTER FROM CONSOLE (8-BITS) 

CALLS* DELAY 

DESTROYS* A, F/F'S 

DESCRIPTION* CI WAITS UNTIL A CHARACTER HAS BEEN ENTERED AT THE 
CONSOLE AND THEN RETURNS THE CHARACTER, VIA THE A 
REGISTER, TO THE CALLING ROUTINE. THIS ROUTINE 
IS CALLED BY THE USER VIA A JUMP TABLE IN RAM. 



PUSH 


B 


CALL 


RICH 


MOV 


C,A 


CALL 


CNVBN 


RLC 




RLC 




RLC 




RLC 




MOV 


B,A 


CALL 


RICH 


MOV 


,C,A 


CALL 


' CNVBN 


ORA 


B 


MOV 


C,A 


ADD 


D 


MOV 


D,A 


MOV 


A,C 


POP 


B 


RET 





CI: 
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LOC OBJ 

04D8 DBED 
04DA E602 
04DC CAD804 
04DF DBEC 
04E1 C9 



04E2 79 
04E3 D630 
04E5 FE0A 
04E7 F8 
04E8 D607 
04EA C9 



04EB DBED 



SEQ 

1204 

1205 

1206 

1207 

1208 

1209 

1210 

1211 

1212 

1213 

1214 

1215 

1216 

1217 

1218 

1219 

1220 

1221 

1222 

1223 

1224 

1225 

1226 

1227 

1228 

1229 

1230 

1231 

1232 

1233 

1234 

1235 

1236 

1237 

1238 

1239 

1240 

1241 

1242 

3243 

1244 

1245 

1246 

1247 

1248 

1249 

1250 

1251 

1252 

1253 

1254 

1255 

1256 

1257 

1258 



SOURCE STATEMENT 



IN 


CONST 


AN I 


RBR 


JZ 


CI 


IN 


CNIN 


RET 





GET STATUS OF CONSOLE 

CHECK FOR RECEIVER BUFFER READY 

NOT YET - WAIT 

READY SO GET CHARACTER 



****************************************************************** 



FUNCTION: CNVBN 

INPUTS: C - ASCII CHARACTER '0'-'9' OR 'A'-'F' 

OUTPUTS: A - TO F HEX 

CALLS: NOTHING 

DESTROYS: A,F/F"S 

DESCRIPTION: CNVBN CONVERTS THE ASCII REPRESENTATION OF A HEX 

CHARACTER INTO ITS CORRESPONDING BINARY VALUE. CNVBN 
DOES NOT CHECK THE VALIDITY OF ITS INPUT. 



CNVBN: 



MOV 

SUI 

CPI 

RM 

SUI 

RET 



A,C 

10 



SUBTRACT CODE FOR '0' FROM ARGUMENT 
WANT TO TEST FOR RESULT OF TO 9 

IF SO, THEN ALL DONE 
ELSE, RESULT BETWEEN 17 AND 23 DECIMAL 

SO RETURN AFTER SUBTRACTING BIAS OF 7 



PO: 



********************************************************************** 

FUNCTION: PO 

INPUTS* C - CHARACTER TO BE PUNCHED 
OUTPUTS* NONE 
CALLS* CO 
DESTROYS* NOTHING 

DESCRIPTION* PO PUNCHES THE CHARACTER SUPPLIED IN TH C REGISTER TO 
THE USER TELETYPEWRITER. 

THIS WILL NOW BE THE SAME AS THE CALL CONSOLE. 
********************************************************************** 



FUNCTION* CO 

INPUTS* C - CHARACTER TO OUTPUT TO CONSOLE 

OUTPUTS* C - CHARACTER OUTPUT TO CONSOLE 

CALLS* SPDLY,MKDLY, DELAY 

DESTROYS* A,F/F'S 

DESCRIPTION* CO SENDS THE INPUT ARGUMENT TO THE CONSOLE. 

AND THEN SENDS THE INPUT ARGUMENT TO THE CONSOLE. 



CO: 



IN 



CONST ; GET STATUS OF CONSOLE 
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LOC OBJ 

04ED E601 
04EF CAEB04 
04F2 79 
04F3 D3EC 
04F5 C9 



04F6 0E0D 
04F8 CD0705 
04.FB C9 



04FC C5 
04FD 068B 

04FF 05 

0500 00 

0501 00 

0502 C2FF04 

0505 CI 

0506 C9 



SEQ 

.1259 
1260 
1261 
1262 
1263 
1264 
1265 
1266 
1267 
1268 
1269 
1270 
1271 
1272 
1273 
1274 
1275 
1276 
1277 
1278 
1279 
1280 
1281 
1282 
1283 
1284 
1285 
1286 
1287 
1288 
1289 
1290 
1291 
1292 
1293 
1294 
1295 
1296 
1297 
1298 
1299 
1300 
1301 
1302 
1303 
1304 
1305 
1306 
1307 
1308 
1309 
1310 
1311 
1312 
1313 



SOURCE STATEMENT 



AN I 


TRDY 


JZ 


CO 


MOV 


A,C 


OUT 


CNOUT 


RET 





SEE IF TRANSMITTER READY 

NO - WAIT 

ELSE, MOVE CHARACTER TO A REG FOR OUTPUT 

SEND TO CONSOLE 



1c**************************************************************** 



FUNCTION: CROUT 
INPUTS: NONE 
OUTPUTS: NONE 
CALLS: ECHO 
DESTROYS: A,B,C,F/F'S 

DESCRIPTION: CROUT SENDS A CARRIAGE RETURN (AND HENCE A LINE 
FEED) TO THE CONSOLE. 



CROUT: 



MVI 

CALL 

RET 



C,CR 
ECHO 



OUTPUT CARRIAGE RETURN TO USER TERMINAL 



DELI: 



************************************************ 

FUNCTION* DELAY 

INPUTS* NONE 

OUTPUTS* NONE 

CALLS* NOTHING 

DESTROYS* NOTHING 

DESCRIPTION* DELAY PROVIDES A PROGRAMMED DELAY OF 1 MILLISECOND 

DELAY: 

SAVE BC REGISTERS 
B,ONEMS ; LOAD 1 MILLISECOND CONSTANT 

DECREMENT COUNTER 

EXTRA TIMMING FOR 8085 TIMMING 

JUMP IF NOT DONE 
RESTORE BC REGISTERS 
RETURN TO CALLING ROUTINE 

******************************************************************* 

FUNCTION: ECHO 

INPUTS: C - CHARACTER TO ECHO TO TERMINAL 

OUTPUTS: C - CHARACTER ECHOED TO TERMINAL 

CALLS: CO 

DESTROYS: A,F/F*S 

DESCRIPTION: ECHO TAKES A SINGLE CHARACTER AS INPUT AND, VIA 
THE MONITOR, SENDS THAT CHARACTER TO THE USER 
TERMINAL; A CARRIAGE RETURN IS ECHOED AS A CARRIAGE 
RETURN LINE FEED, AND AN ESCAPE CHARACTER IS ECHOED AS $ 

ECHO: 



PUSH 


B 


MVI 


B,ON 


DCR 


B 


NOP 




NOP 




JNZ 


DELI 


POP 


B 


RET 
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LOC OBJ 

0507 C5 

0508 3E1B 
050A B9 
050B C21005 
050E 0E24 

0510 CDEB04 
0513 3E0D 

0515 B9 

0516 C22305 

0519 0E00 
051B CDEB04 
051E 0E0A 

0520 CDEB04 

0523 CI 

0524 C9 



0525 0E23 
0527 CD0705 

052A CDF604 
052D CD1502 
0530 C35401 



0533 37 



SEQ 

1314 

]315 

1316 

1317 

1318 

1319 

1320 

1321 

1322 

1323 

1324 

132 5 

1326 

1327 

1328 

1329 

1330 

1331 

1332 

1333 

1334 

1335 

1336 

1337 

1338 

1339 

1340 

1341 

1342 

1343 

1344 

1345 

1346 

1347 

1348 

1349 

1350 

1351 

1352 

1353 

1354 

1355 

1356 

1357 

1358 

1359 

1360 

1361 

1362 

1363 

1364 

1365 

1366 

1367 

1368 



SOURCE STATEMENT 



ECH05: 



ECH10: 



PUSH 

MVI 

CMP 

JNZ 

MVI 

CALL 

MVI 

CMP 

JNZ 

MVI 

CALL 

MVI 

CALL 

POP 

RET 



B 

A, ESC 

C 

ECH05 

C,'$' 

CO 

A,CR 

C 

ECH10 

C,00 

CO 

C,LF 

CO 

B 



SAVE ARGUMENTT 

SEE IF ECHOING AN ESCAPE CHARACTER 
NO - BRANCH 
YES - ECHO AS $ 

DO OUTPUT THROUGH MONITOR 

SEE IF CHARACTER ECHOED WAS A CARRIAGE RE'j 
NO - NO NEED TO TAKE SPECIAL ACTION 
NULL FOR AUTO LINE FEED CRT 
ALLOW ANOTHER CHARACTER DELAY FOR TTY 
YES - WANT TO ECHO LINE FEED, TOO 



; RESTORE ARGUMENT 



******************************************************************* 



FUNCTION: ERROR 

INPUTS: NONE 

OUTPUTS: NONE 

CALLS: GCM40,ECHO,CROUT,GETCM 

DESTROYS • A B C » F/F ' S 

DESCRIPTION: ERROR PRINTS THE ERROR CHARACTER (CURRENTLY A CHECK 

ON THE CONSOLE, FOLLOWED BY A CARRIAGE RETURN-LINE FEED, 
AND THEN RETURNS CONTROL TO THE COMMAND RECOGNIZER. 



ERROR: 



EXIT: 



MVI 
CALL 

CALL 
CALL 
JMP 



C,'#' 
ECHO 

CROUT 
GCM4 
GETCM 



SEND # TO CONSOLE 

SKIP TO BEGINNING OF NEXT LINE 

IN CASE OF ERROR, CLEAR BREAK RAM ADDRESSES 

TRY AGAIN FOR ANOTHER COMMAND 



********************************* 



************************************* 



FUNCTION: FRET 

INPUTS: NONE 

OUTPUTS: CARRY - ALWAYS 

CALLS: NOTHING 

DESTROYS: CARRY 

DESCRIPTION: FRET IS JUMPED TO BY ANY ROUTINE THAT WISHES TO 
INDICATE FAILURE ON RETURN. FRET SETS THE CARRY 
FALSE, DENOTING FAILURE, AND THEN RETURNS TO THE 
CALLER OF THE ROUTINE INVOKING FRET. 



FRET: 



ETC 



FIRST SET CARRY TRUE 



ISIS-II 8080/8085 MACRO ASSEMBLER, V2.0 
04/24/78 



MODULE 



PAGE 



26 



LOC OBJ 

0534 3F 

0535 C9 



0536 CDD8 04 
0539 E67F 
053B 4F 
053C C9 



053D E5 
053E 210000 
0541 1E00 

0543 CD3605 
0546 CD0705 
0549 CD6D07 
054C D25B05 



SEQ 

1369 

1370 

1371 

1372 

1373 

1374 

1375 

1376 

1377 

1378 

1379 

1380 

1381 

1382 

1383 

1384 

1385 

1386 

1387 

138 8 

1389 

1390 

1391 

1392 

1393 

1394 

1395 

1396 

1397 

1398 

1399 

1400 

1401 

1402 

1403 

1404 

1405 

1406 

1407 

1408 

1409 

1410 

1411 

1412 

1413 

1414 

1415 

1416 

1417 

1418 

1419 

1420 

1421 

1422 

1423 



SOURCE STATEMENT 

CMC 
RET 



; THEN COMPLEMENT IT TO MAKE IT FALSE 
; RETURN APPROPRIATELY 



FUNCTION: GETCH 
INPUTS: NONE 

OUTPUTS: C - NEXT CHARACTER IN INPUT STREAM 
CALLS: CI 

DESTROYS: A,C,F/F'S 

DESCRIPTION: GETCH RETURNS THE NEXT CHARACTER IN THE INPUT STREAM 
TO THE CALLING PROGRAM. 



GETCH: 



CALL 


CI 


AN I 


PRTY0 


MOV 


C,A 


RET 





GET CHARACTER FROM TERMINAL 

TURN OFF PARITY BIT IN CASE SET BY CONSOLE 

PUT VALUE IN C REGISTER FOR RETURN 



FUNCTION: GETHX 

INPUTS: NONE 

OUTPUTS: BC - 16 BIT INTEGER 

D - CHARACTER WHICH TERMINATED THE INTEGER 
CARRY - 1 IF FIRST CHARACTER NOT DELIMITER 
- IF FIRST CHARACTER IS DELIMITER 

CALLS : GETCH , ECHO, VALD L , VALDG , CNVBN , ERROR 

DESTROYS: A,B,C,D, E,F/F" S 

DESCRIPTION: GETHX ACCEPTS A STRING OF HEX DIGITS FROM THE INPUT 
STREAM AND RETURNS THEIR VALUE AS A 16 BIT BINARY 
INTEGER. IF MORE THAN 4 HEX DIGITS ARE ENTERED, 
ONLY THE LAST 4 ARE USED. THE NUMBER TERMINATES WHEN 
A VALID DELIMITER IS ENCOUNTERED. THE DELIMITER IS 
ALSO RETURNED AS AN OUTPUT OF THE FUNCTION. ILLEGAL 
CHARACTERS (NOT HEX DIGITS OR DELIMITERS) CAUSE AN 
ERROR INDICATION. IF THE FIRST (VALID) CHARACTER 
ENCOUNTERED IN THE INPUT STREAM IS NOT A DELIMITER, 
GETHX WILL RETURN WITH THE CARRY BIT SET TO 1 
OTHERWISE, THE CARRY BIT IS SET TO AND THE CONTENTS 
OF BC ARE UNDEFINED. 



GETHX: 



GHX05: 



PUSH 


H 


LXI 


H,0 


MVI 


E,0 


CALL 


GETCH 


CALL 


ECHO 


CALL 


VALDL 


JNC 


GHX10 



SAVE HL 

INITIALIZE RESULT 

INITIALIZE DIGIT FLAG TO FALSE 

GET A CHARACTER 
ECHO THE CHARACTER 
SEE IF DELIMITER 
NO - BRANCH 



ISIS-II 


8080/8 


04/24/78 


LOC 


OBJ 


054F 


51 


0550 


E5 


0551 


CI 


0552 


El 


0553 


7B 


0554 


B7 


0555 


C22607 


0558 


CA3305 


055B 


CD5207 


055E 


D22505 


0561 


CDE204 


0564 


1EFF 


0566 


29 


0567 


29 


0568 


29 


0569 


29 


056A 


0600 


056C 


4F 


56D 


09 


056E 


C34305 
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0571 2E03 

0573 79 

0574 E603 

0576 C8 

0577 67 

0578 CD3D05 
057B D22505 
057E C5 
057F 2D 

0580 25 

0581 CA8D05 
0584 7A 



SEQ 

1424 

1425 

1426 

1427 

1428 

1429 

1430 

1431 

1432 

1433 

1434 

1435 

1436 

1437 

1438 

1439 

1440 

1441 

1442 

1443 

1444 

1445 

1446 

1447 

1448 

1449 

1450 

1451 

1452 

1453 

1454 

1455 

1456 

1457 

1458 

1459 

1460 

1461 

1462 

1463 

1464 

1465 

1466 

1467 

1468 

1469 

1470 

1471 

1472 

1473 

1474 

1475 

1476 

1477 

1478 



SOURCE STATEMENT 



GHX10: 



YES - ALL DONE, BUT WANT TO RETURN DELIMITER 

MOVE RESULT TO BC 

RESTORE HL 

GET FLAG 

SET F/F'S 

IF FLAG NON-0, A NUMBER HAS BEEN FOUND 

ELSE, DELIMITER WAS FIRST CHARACTER 

IF NOT DELIMITER, SEE IF DIGIT 

ERROR IF NOT A VALID DIGIT, EITHER 

CONVERT DIGIT TO ITS BINARY VALUE 

SET DIGIT FLAG NON-0 

*2 

*4 

*8 

*16 

CLEAR UPPER 8 BITS OF BC PAIR 

BINARY VALUE OF CHARACTER INTO C 

ADD THIS VALUE TO PARTIAL RESULT 

GET NEXT CHARACTER 



***************************************************************** 



FUNCTION* GETNM 

INPUTS* C - COUNT OF NUMBERS TO FIND IN INPUT STREAM 

OUTPUTS* TOP OF STACK - NUMBERS FOUND IN REVERSE ORDER (LAST ON T 
OF STACK) 

CALLS* GETHX,HILO, ERROR 

DESTROYS* A,B,C,D,E,H,L,F/F'S 

DESCRIPTION* GETNM FINDS A SPECIFIED COUNT OF NUMBERS, 
AND 3, INCLUSIVE, IN THE INPUT 
STREAM AND RETURNS THEIR VALUES ON THE STACK. IF 2 
OR MORE NUMBERS ARE REQUESTED, THEN THE FIRST MUST BE 
LESS THAN OR EQUAL TO THE SECOND, OR THE FIRST AND 
SECOND NUMBERS WILL BE SET EQUAL. THE LAST NUMBER 
REQUESTED MUST BE TERMINATED BY A CARRIAGE RETURN 
OR AN ERROR INDICATION WILL RESULT. 



MOV 


D,C 


PUSH 


H 


POP 


B 


POP 


H 


MOV 


A,E 


ORA 


A 


JNZ 


SRET 


JZ 


FRET 


CALL 


VALDG 


JNC 


ERROR 


CALL 


CNVBN 


MVI 


E,00FFH 


DAD 


H 


DAD 


H 


DAD 


H 


DAD 


H 


MVI 


B,0 


MOV 


C,A 


DAD 


B 


JMP 


GHX05 



BETWEEN 1 



GETNM: 



GNM05: 



MVI 


L,3 ; 


MOV 


A,C 


ANI 


3 ; 


RZ 




MOV 


H,A 


CALL 


GETHX 


JNC 


ERROR 


PUSH 


B 


DCR 


L 


DCR 


H ; 


JZ 


GNM10 


MOV 


A,D ; 



PUT MAXIMUM ARGUMENT COUNT INTO L 
GET THE ACTUAL ARGUMENT COUNT 
FORCE TO MAXIMUM OF 3 
IF 0, DON'T BOTHER TO DO ANYTHIING 
ELSE, PUT ACTUAL COUNT INTO H 

GET A NUMBER FROM INPUT STREAM 
ERROR IF NOT THERE - TOO FEW NUMBERS 
ELSE, SAVE NUMBER ON STACK 
DECREMENT MAXIMUM ARGUMENT COUNT 
DECREMENT ACTUAL ARGUMENT COUNT 
BRANCH IF NO MORE NUMBERS WANTED 
ELSE, GET NUMBER TERMINATOR TO A 
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LOC OBJ 

0585 FE0D 
0587 CA2505 
058A C37805 

058D 7A 
058E FE0D 
0590 C22505 
0593 01FFPF 

0596 7D 

0597 B7 

0598 CAA005 

059B C5 
059C 2D 
059D C29B05 

05A0 CI 
05A1 Dl 
05A2 El 
05A3 CDB605 
05A6 D2AB05 
05A9 54 
05AA 5D 

05AB E3 
05AC D5 
05AD C5 
05AE E5 

05AF 3D 
05B0. F8 
05B1 El 
05B2 E3 
05B3 C3AF05 



05B6 C5 

05B7 47 

05B8 23 

05B9 7C 



SEQ 

1479 

1480 

1481 

1482 

1483 

1484 

1485 

1486 

1487 

1488 

1489 

1490 

1491 

1492 

1493 

1494 

1495 

1496 

1497 

1498 

1499 

1500 

1501 

1502 

1503 

1504 

1505 

1506 

1507 

1508 

1509 

1510 

1511 

1512 

1513 

1514 

1515 

1516 

1517 

1518 

1519 

1520 

1521 

1522 

1523 

1524 

1525 

1526 

1527 

1528 

1529 

1530 

1531 

1532 

1533 



SOURCE STATEMENT 



GNM10: 



GNM15: 



GNM20: 



GNM25: 



GNM30: 



CPI 


CR ; 


JZ 


ERROR ; 


JMP 


GNM05 ; 


MOV 


A,D 


CPI 


CR ; 


JNZ 


ERROR 


LXI 


B,0FFFFH; 


MOV 


A,L ; 


ORA 


A 


JZ 


GNM20 ; 


PUSH 


B 


DCR 


L 


JNZ 


GNM15 ; 


POP 


■ B 


POP 


D 


POP 


H 


CALL 


HILO 


JNC . 


GNM25 ; 


MOV 


D,H ; 


MOV 


E,L 


XTHL 




PUSH 


D 


PUSH 


B 


PUSH 


H ; 


DCR 


A ; 


RM 




POP 


H 


XTHL 




JMP 


GNM30 ; 



SEE IF CARRIAGE RETURN 

ERROR IF SO - TOO FEW NUMBERS 

ELSE, PROCESS NEXT NUMBER 

WHEN COUNT 0, CHECK LAST TERMINATOR 

ERROR IF NOT CARRIAGE RETURN 

HL GETS LARGEST NUMBER 

GET WHAT'S LEFT OF MAXIMUM ARG COUNT 

CHECK FOR 

IF YES, 3 NUMBERS WERE INPUT 

IF NOT, FILL REMAINING ARGUMENTS WITH 0FFFFH 



GET THE 3 ARGUMENTS OUT 



SEE IF FIRST >= 
NO - BRANCH 



SECOND 



YES - MAKE SECOND EQUAL TO THE FIRST 

PUT FIRST ON STACK - GET RETURN ADDR 
PUT SECOND ON STACK 
PUT THIRD ON STACK 
PUT RETURN ADDRESS ON STACK 

DECREMENT RESIDUAL COUNT 

IF NEGATIVE, PROPER RESULTS ON STACK 
ELSE, GET RETURN ADDR 

REPLACE TOP RESULT WITH RETURN ADDR 
TRY AGAIN 



*************************** *********************** 



*************** 



FUNCTION* HILO 

INPUTS* DE - 16 BIT INTEGER 
HL - 16 BIT INTEGER 

OUTPUTS* CARRY - IF HL<DE 

- 1 IF HL>=DE 

CALLS* NOTHING 

DESTROYS* A,F/F'S 

DESCRIPTION* HILO COMPARES THE 2 16 BIT INTEGERS IN HL AND DE. THE 
INTEGERS ARE TREATED AS UNSIGNED NUMBERS. THE CARRY 
BIT IS SET ACCORDING TO THE RESULT OF THE COMPARISON. 



HILO: 



PUSH 


B 


MOV 


B,A 


INX 


H 


MOV 


A,H 



SAVE BC 

SAVE A REGISTER 

INCREMENT HL BY 1 

WANT TO TEST FOR RESULT AFTER 



ISIS-II 8080/8085 MACRO ASSEMBLER, V2.0 
04/24/78 



MODULE 



PAGE 



29 



LOC OBJ 



SEQ 



SOURCE STATEMENT 



05BA B5 
05BB 2B 
05BC 37 
05BD CAC505 
05C0 7D 
05C1 93 
05C2 7C 
05C3 9A 
05C4 3F 

05C5 78 
05C6 CJ 
05C7 C9 



05C8 063C 

05CA 0E00 
05CC CDEB04 
05CF 05 
05D0 C2CA05 
05D3 C9 



05D4 F5 

05D5 0F 

05D6 0F 

05D7 0F 



1534 
1535 
1536 
1537 
1538 
1539 
1540 
1541 
1542 
1543 
1544 
1545 
1546 
1547 
1548 
1549 
1550 
1551 
1552 
1553 
1554 
1555 
1556 
1557 
1558 
1559 
1560 
1561 
1562 
1563 
1564 
1565 
1566 
1567 
1568 
1569 
1570 
1571 
1572 
1573 
1574 
1575 
1576 
1577 
1578 
1579 
1580 
1581 
1582 
1583 
1584 
1585 
1586 
1587 
1588 



HIL05: 



/INCREMENTING 

RESTORE HL 

SET CARRY 

IF SO, CARRY IS SET PROPERLY 

IF NOT, MOVE L TO A 

SUBTRACT E 

MOVE H TO A 

SUBTRACT D WITH BORROW 

COMPLIMENT CARRY FOR CORRECT CARRY BIT VALUE 

RESTORE A 
RESTORE BC 
EXIT 



***************************************************************** 



FUNCTION* LEAD 
INPUTS* NONE 

OUTPUTS* NONE ' 

CALLS* PO 

DESTROYS* B,C,F/F'S 

DESCRIPTION* LEAD OUTPUTS 60 NULL CHARACTERS TO PAPER TAPE TO FORM A 
LEADER. 



ORA 


L ; 


DCX 


H 


STC 




JZ 


HIL05 ; 


MOV 


A,L 


SUB 


E ; 


MOV 


A,H 


SBB 


D 


CMC 




MOV 


A,B 


POP 


B 


RET 





LEAD: 
LE05: 



MVI 

MVI 

CALL 

DCR 

JNZ 

RET 



B,60 

C,0 
PO 
B 
LE05 



; LOAD B WITH A COUNT OF 60 



PUNCH NULL CHARACTER 

DECREMENT COUNT 

DO IT AGAIN IF NOT DONE 



********************************************************************** 



FUNCTION* NMOUT 

INPUTS* A - 8 BIT INTEGER 

OUTPUTS* NONE 

CALLS* ECHO,PRVAL 

DESTROYS* A,B,C,F/F'S 

DESCRIPTION* NMOUT CONVERTS THE 8 BIT, UNSIGNED INTEGER IN THE 

A REGISTER INTO 2 ASCII CHARACTERS. THE ASCII CHARACTERS 
ARE THE ONES REPRESENTING THE 8 BITS. THESE TWO 
CHARACTERS ARE SENT TO THE CONSOLE AT THE CURRENT PRINT 
POSITION OF THE CONSOLE. 



NMOUT: 



PUSH 
RRC 
RRC 
RRC 



PSW 



SAVE ARGUMENT 
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LOC OBJ 

5D8 0F 
05D9 CD5606 
05DC CD0705 
05DF Fl 
05E0 CD5606 
05E3 CD0705 
05E6 C9 



05E7 0E4E 
05E9 CD0705 
05EC 0E49 
0SEE CD0705 
05F1 0E3D 
05F3 CD0705 
05F6 1603 
05F8 2ABF7F 

05FB 7E 
05FC CDD4 05 
05FF 0E20 
0601 CD0705 

0604 15 

0605 23 

0606 C2FB05 
0609 CDF604 
060C C9 



060D 7C 
060E CD1606 



SEQ 

1589 
1590 
1591 
1592 
1593 
1594 
1595 
1596 
1597 
1598 
1599 
1600 
1601 
1602 
1603 
1604 
1605 
1606 
1607 
1608 
1609 
161P 
1611 
1612 
1613 
1614 
1615 
1616 
1617 
1618 
1619 
1620 
3621 
1622 
1623 
1624 
1625 
1626 
1627 
1628 
1629 
1630 
1631 
1632 
1633 
1634 
1635 
1636 
1637 
1638 
1639 
1640 
1641 
1642 
1643 



SOURCE STATEMENT 



RRC 




CALL 


PRVAL 


CALL 


ECHO 


POP 


PSW 


CALL 


PRVAL 


CALL 


ECHO 


RET 





GET UPPER 4 BITS TO LOW 4 BIT POSITIONS 
CONVERT LOWER 4 BITS TO ASCII 
SEND TO TERMINAL 
GET BACK ARGUMENT 



********************************************************************** 



FUNCTION* NXTIN 

INPUTS* NONE 

OUTPUTS* NONE 

CALLS* ECHO,NMOUT,CROUT 

DESTROYS* A,F/F'S,C,D,H,L 

DESCRIPTION* NXTIN PRINTS 3 BYTES OF NEXT INSTRUCTION ON THE CONSOLE 



NXTIN: 



NXT05: 



MVI 

CALL 

MVI 

CALL 

MVI 

CALL 

MVI 

LHLD 

MOV 

CALL 

MVI 

CALL 

DCR 

INX 

JNZ 

CALL 

RET 



C, "N 1 

ECHO 

C'l' 

ECHO 

C,'=' 

ECHO 

D,3 

PSAVE 

A,M 

NMOUT 

C,' ' 

ECHO 

D 

H 

NXT05 

CROUT 



OUTPUT 'NI=' 



OUTPUT 3 BYTES 
GET LAST PC 



OUTPUT BYTE 

USE SPACE FOR DELIMITER 

DECREMENT COUNT 
INCREMENT PC ADDRESS 
DO NEXT BYTE 

RETURN 



***************************************************************** 



FUNCTION* PADR 

INPUTS* HL - ADDRESS TO BE PUNCHED 
OUTPUTS* NONE 
CALLS* PBYTE 
DESTROYS* A 

DESCRIPTION* PADR PUNCHES ON THE TELETYPEWRITER THE ADDRESS 
CONTAINED IN THE H,L REGISTERS. 



PADR: 



MOV 
CALL 



A,H ; PUNCH FIRST HALF OF ADDRESS 

PBYTE 
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LOC OBJ 

0611 7D 

0612 CD1.606 
0615 C9 



0616 F5 

0617 0F 

0618 0F 

0619 0F 
061A 0F 
061B CD5606 
061E CDEB04 

0621 Fl 

0622 F5 

0623 CD5606 
0626 CDEB04 
0629 Fl 
062A 82 
062B 57 
062C C9 



062D 0E3A 
062F CDEB04 

0632 AF 

0633 57 

0634 CD1606 
0637 210000 



SEQ 

1644 

1645 

1646 

1647 

1648 

1649 

1650 

1651 

1652 

1653 

1654 

1655 

1656 

1657 

1658 

1659 

1660 

1661 

1662 

1663 

1664 

1665 

1666 

1667 

1668 

1669 

1670 

1671 

1672 

1673 

1674 

1675 

1676 

1677 

1678 

1679 

1680 

1681 

1682 

1683 

1684 

1685 

1686 

1687 

1688 

1689 

1690 

1691 

1692 

1693 

1694 

1695 

1696 

1697 

1698 



SOURCE STATEMENT 



MOV 

CALL 

RET 



A,L 
PBYTE 



PUNCH SECOND HALF OF ADDRESS 
RETURN TO CALLING ROUTINE 



***************************************************************** 



FUNCTION* PBYTE 

INPUTS* A - CHARACTER TO BE PUNCHED 

D - CURRENT VALUE OF CHECKSUM 
OUTPUTS* D - UPDATED VALUE OF CHECKSUM 
CALLS* PRVAL, PO 
DESTROYS* A,F/F'S 

DESCRIPTION* PBYTE CONVERTS THE HEXADECIMAL VALUE IN THE A REGISTER 
INTO TWO ASCII CHARACTERS AND PUNCHES THESE CHARACTERS 
ON PAPER TAPE. THE CHECKSUM CONTAINED IN D IS UPDATED. 



PBYTE: 



SAVE A,F/F'S 

POSITION UPPER 4 BITS INTO LOWER 4 BITS 



CONVERT UPPER 4 BITS JUST ROTATED TO ASCII 

PUNCH CHARACTER 

RESTORE A,F/F'S 

SAVE A AGAIN 

CONVERT LOWER 4 BITS TO ASCII CHARACTER 

PUNCH CHARACTER 

RESTORE A 

ADD VALUE TO CHECKSUM 

UPDATE D REGISTER WITH NEW CHECKSUM 

RETURN TO CALLING ROUTINE 



***************************************************************** 



FUNCTION* PEOF 

INPUTS* NONE 

OUTPUTS* NONE 

CALLS* PO, PBYTE, PADR, LEAD 

DESTROYS* A,C,D,H,L,F/F'S 

DESCRIPTON* PEOF PUNCHES THE END OF FILE RECORD CONSISTING OF A RECO 

MARK, A LOAD ADDRESS OF 0, THE RECORD TYPE, AND THE 

RECORD CHECKSUM. 



PUSH 


PSW 


RRC 




RRC 




RRC 




RRC 




CALL 


PRVAL 


CALL 


PO 


POP 


PSW 


PUSH 


PSW 


CALL 


PRVAL 


CALL 


PO 


POP 


PSW 


ADD 


D 


MOV 


D,A 


RET 





PEOF: 



MVI 


p i . ■ 


CALL 


PO 


XRA 


A 


MOV 


D,A 


CALL 


PBYTE 


LXI 


H,0 



PUNCH RECORD MARK 

ZERO CHECKSUM 

SAVE IN D REGISTER 

PUNCH RECORD LENGTH 

LOAD HL WITH ZERO ADDRESS 
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LOC OBJ 

063A CD0D06 
063D 3E01 
063F CD1606 

0642 AF 

0643 92 

0644 CD1606 
0647 CDC805 
064A C9 



064B 0E0D 
064D CDEB04 
0650 0E0A 
0652 CDEB04 
0655 C9 



0656 E60F 
0658 C690 
065A 27 
065B CE40 
065D 27 
065E 4F 
065F C9 



SEQ 

1699 

1700 

1701 

1702 

1703 

1704 

1705 

1706 

1707 

1708 

1709 

1710 

1711 

1732 

1713 

1714 

1715 

1716 

1717 

1718 

1719 

1720 

1721 

1722 

1723 

1724 

1725 

1726 

1727 

1728 

1729 

1730 

1731 

1732 

1733 

1734 

1735 

1736 

1737 

1738 

1739 

1740 

1741 

1742 

1743 

1744 

1745 

1746 

1747 

1748 

1749 

1750 

1751 

1752 

1753 



SOURCE STATEMENT 



CALL 


PADR 


; PUNCH IT 


MVI 


A,l 


LOAD A WITH RECORD TYPE 


CALL 


PBYTE 


• PUNCH IT 


XRA 


A 


• ZERO A ; 


SUB 


D 


• COMPUTE CHECKSUM 


CALL 


PBYTE 


PUNCH IT 


CALL 


LEAD 


PUNCH TRAILER 


RET 







**************************** ************************************* 



FUNCTION* PEOL 
INPUTS* NONE 
OUTPUTS* NONE 
CALLS* PO 
DESTROYS* C 

DESCRIPTION* PEOL PUNCHES A CARRIAGE RETURN AND LINE FEED ONTO 
PAPER TAPE. 



PEOL: 



MVI 


C,CR 


CALL 


PO 


MVI 


C,LF 


CALL 


PO 


RET 





PUNCH CARRIAGE RETURN CHARACTER 
PUNCH LINE FEED CHARACTER 



********************************************* ******************** 



FUNCTION* PRVAL 

INPUTS* A - INTEGER, RANGE TO F 

OUTPUTS* A - ASCII CHARACTER 

CALLS* NOTHING 

DESTROYS* NOTHING 

DESCRIPTION* PRVAL CONVERTS A NUMBER IN THE RANGE TO F HEX TO 
THE CORRESPONDING ASCII CHARACTER, 0-9, A-F. PRVAL 
DOES NOT CHECK THE VALIDITY OF ITS INPUT ARGUMENT. 

PRVAL: 

MASK OUT UPPER 4 BITS - WANT 1 HEX CHAR 

SET UP A SO THAT A-F CAUSE A CARRY 

ADJUST CONTENTS OF A REGISTER 

ADD IN CARRY AND ADJUST UPPER 4 BITS 

ADJUST CONTENTS OF A REGISTER AGAIN 

MOVE ASCII CHARACTER TO C 

ALL DONE 

******************************************************************** 



FUNCTION* REGDS 



AN I 


HCHAR 


ADI 


09 0H 


DAA 




ACI 


04 0H 


DAA 




MOV 


C,A 


RET 
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LOC OBJ 



0660 21D507 



0663 


4E 


0664 


79 


0665 


B7 


0666 


C26D06 


0669 


CDF 60 4 


066C 


C9 


066D 


CD0705 


0670 


0E3D 


0672 


CD0705 


0675 


23 


0676 


5E 


0677 


167F 


0679 


23 


067A 


1A 


067B 


CDD405 


067E 


7E 


067F 


B7 


0680 


CA8806 


0683 


IB 


0684 


1A 


0685 


CDD405 


0688 


0E20 


068A 


CD0705 


068D 


23 


068E 


C36306 



0691 22BD7F 
0694 El 



SEQ 

1754 
1755 
1756 
1757 
1758 
1759 
1760 
1761 
1762 
1763 
1764 
1765 
1766 
1767 
1768 
1769 
1770 
1771 
1772 
1773 
1774 
1775 
1776 
1777 
1778 
1779 
1780 
1781 
1782 
1783 
1784 
1785 
1786 
178 7 
1788 
1789 
1790 
1791 
1792 
1793 
1794 
1795 
1796 
1797 
1798 
1799 
1800 
1801 
1802 
1803 
1804 
1805 
1806 
1807 
1808 



SOURCE STATEMENT 

INPUTS* NONE 

OUTPUTS* NONE 

CALLS* ECHO, NMOUT, ERROR, CROUT 

DESTROYS* A,B,C,D,E,H,L,F/F'S 

DESCRIPTION* REGDS DISPLAYS THE CONTENTS OF THE REGISTER SAVE 
LOCATIONS, IN FORMATTED FORM, ON THE CONSOLE. THE 
DISPLAY IS DRIVEN FROM A TABLE, RTAB, WHICH CONTAINS 
THE REGISTER'S PRINT SYMBOL, SAVE LOCATION ADDRESS, 
AND LENGTH (8 OR 16 BITS) . 



REGDS : 



REG05: 



REG10: 



LXI H,RTAB ; LOAD HL WITH ADDRESS OF START OF TABLE 
GET PRINT SYMBOL OF REGISTER 



TEST FOR - END OF TABLE 

IF NOT END, BRANCH 

ELSE, CARRIAGE RETURN/LINE FEED TO END 

/DISPLAY 

ECHO CHARACTER 

OUTPUT EQUALS SIGN, I.E. A= 

POINT TO START OF SAVE LOCATION ADDRESS 

GET LSP OF SAVE LOCATION ADDRESS TO E 

PUT MSP OF SAVE LOC ADDRESS INTO D 

POINT TO LENGTH FLAG 

GET CONTENTS OF SAVE ADDRESS 

DISPLAY ON CONSOLE 

GET LENGTH FLAG 

SET SIGN F/F 

IF 0, REGISTER IS 8 BITS 

ELSE, 1.6 BIT REGISTER SO MORE TO DISPLAY 

GET LOWER 8 BITS 

DISPLAY THEM 



OUTPUT BLANK CHARACTER 

POINT TO START OF NEXT TABLE ENTRY 

DO NEXT REGISTER 



********************************************************************** 



FUNCTION* REGSV 

INPUTS* NONE 

OUTPUTS* NONE 

CALLS* NONE 

DESTROYS* H,SP 

DESCRIPTION* REGSV SAVES THE USER REGISTERS ON INTERRUPT 



REG15: 



MOV 


C,M 


MOV 


A,C 


ORA 


A 


JNZ 


REG 10 


CALL 


CROUT 


RET 




CALL 


ECHO 


MVI 


C,' = ' 


CALL 


ECHO 


INX 


H 


MOV 


E,M 


MVI 


D,HREGS 


INX 


H 


LDAX 


D 


CALL 


NMOUT 


MOV 


A,M 


ORA 


A 


JZ 


REG15 


DCX 


D 


LDAX 


D 


CALL 


NMOUT 


MVI 


C,' ' 


CALL 


ECHO 


INX 


H 


JMP 


REG 05 



REGSV: 



SHLD 
POP 



LSAVE 
H 



SAVE HL REGISTERS 
GET CALLING ADDRESS 
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LOG OBJ 

0695 E3 

0696 22BF7F 
0699 F5 
069A 210400 
069D 39 
069E 22C17F 
06A1 Fl 
06A2 El 
06A3 31BD7F 
06A6 F5 
06A7 C5 
06A8 D5 
06A9 E9 



06AA 21D507 
06AD 110300 

06B0 7E 
06B1 B7 
06B2 CA2505 
06B5 B9 
06B6 CABD06 
06B9 19 
06BA C3B006 

06BD 23 
06BE 44 
06BF 4D 
06C0 C9 



SEQ 

1809 
1810 
1811 
1812 
1813 
1814 
1815 
1816 
1817 
1818 
1819 
1820 
1821 
1822 
1823 
1824 
1825 
1826 
1827 
1828 
1829 
1830 
1831 
1832 
1833 
1834 
1835 
1836 
1837 
1838 
1839 
1840 
1841 
1842 
1843 
1844 
1845 
1846 
1847 
184 8 
1849 
1850 
1851 
1852 
1853 
1854 
1855 
1856 
1857 
1858 
1859 
1860 
1861 
1862 
1863 



SOURCE STATEMENT 



XTHL 

SHLD 

PUSH 

LXI 

DAD 

SHLD 

POP 

POP 

LXI 

PUSH 

PUSH 

PUSH 

PCHL 



PS AVE 

PSW 

H,4 

SP 

SSAVE 

PSW 

H 

SP,ASAVE+1 

PSW 

B 

D 



EXCHANGE CALLER ADDR. WITH INT. PC 

ASSUME THIS IS THE LAST PROG COUNTER 

SAVE A,F/F'S 

SET HL TO 4 TO SAVE STACK POINTER CORRECTLY 

GET STACK POINTER VALUE 

SAVE USERS STACK POINTER 

RESTORE A,F/F'S 

CALLERS RETURN POINT 

; NEW VALUE FOR STACK POINTER 
SAVE THE REST OF THE REGISTERS 



RETURN 



***************************************************************** 



FUNCTION* RGADR 

INPUTS* C - CHARACTER DENOTING REGISTER 

OUTPUTS* BC - ADDRESS OF ENTRY IN RTAB CORRESPONDING TO REGISTER 

CALLS* ERROR 

DESTROYS* A,B,C,D,E,H,L,F/F'S 

DESCRIPTION* RGADR TAKES A SINGLE CHARACTER AS INPUT. THIS CHARACTER 
DENOTES A REGISTER. RGADR SEARCHES THE TABLE RTAB 
FOR A MATCH ON THE INPUT ARGUMENT. IF ONE OCCURS, 
RGADR RETURNS THE ADDRESS OF THE ADDRESS OF THE 
SAVE LOCATION CORRESPONDING TO THE REGISTER. THIS 
ADDRESS POINTS INTO RTAB. IF NO MATCH OCCURS, THEN 
THE REGISTER IDENTIFIER IS ILLEGAL AND CONTROL IS 
PASSED TO THE ERROR ROUTINE. 



RGADR: 



RGA05: 



HL GETS ADDRESS OF TABLE START 
DE GET SIZE OF A TABLE ENTRY 

GET REGISTER IDENTIFIER 

CHECK FOR TABLE END (IDENTIFIER IS 0) 

IF AT END OF TABLE, ARGUMENT IS ILLEGAL 

ELSE, COMPARE TABLE ENTRY AND ARGUMENT 

IF EQUAL, WE'VE FOUND WHAT WE'RE LOOKING FOR 

ELSE, INCREMENT TABLE POINTER TO NEXT ENTRY 

TRY AGAIN 

IF A MATCH, INCREMENT TABLE POINTER TO 
/SAVE LOCATION ADDRESS 
RETURN THIS VALUE 



***************************************************************** 



RGA10: 



LXI 


H,RTAB ; 


LXI 


D,RTABS ; 


MOV 


A,M 


ORA 


A 


JZ 


ERROR ; 


CMP 


c 


JZ 


RGA10 


DAD 


D 


JMP 


RGA05 ; 


INX 


H 


MOV 


B,H 


MOV 


C,L 


RET 





FUNCTION* RI 
INPUTS* NONE 
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LOC OBJ 



3EQ 



SOURCE STATEMENT 



06C1 C5 

06C2 DBED 
06C4 E604 
06C6 CAC205 
06C9 3E37 
06CB D3ED 
06CD 0628 

06CF CDFC04 
06D2 05 
06D3 C2CF06 
06D6 3E35 
06D8 D3ED 
6DA 6FA 

06DC DBED 
06DE E602 
06E0 C2EE06 
06E3 CDFC04 
06E6 05 
06E7 C2DC06 
06EA AF 
06EB 37 
06EC CJ 
06ED C9 

06EE DBEC 
06F0 B7 
06F] C.1 
06F2 C9 



06F3 CDC106 
06F6 DA2505 
06F9 E67F 
06FB C9 



1864 
1865 
1866 
1867 
1868 
1869 
1870 
1871 
1872 
1873 
1874 
1875 
1876 
1877 
J878 
1879 
1880 
1881 
1882 
188 3 
1884 
1885 
1886 
1887 
1888 
1889 
1890 
1891 
1892 
1893 
1894 
1895 
1896 
1897 
1898 
1899 
1900 
1901 
1902 
1903 
1904 
1905 
1906 
1907 
1908 
1909 
1910 
1911 
1912 
1913 
1914 
1915 
1916 
1917 
1918 



; OUTPUTS* A - ZERO, CARRY - 1 IF END OF FILE 

A - CHARACTER, CARRY - IF VALID CHARACTER 
; CALLS* DELAY 
; DESTROYS* A,F/F'S 
; DESCRIPTION* RI READS A CHARACTER FROM THE TTY TAPE READER. 



RI: 
RI05: 



RI07: 



RI10: 



RI15: 



PUSH 

IN 

AN I 

JZ 

MVI 

OUT 

MVI 

CALL 

DCR 

JNZ 

MVI 

OUT 

MVI 

IN 

AN I 

JNZ 

CALL 

DCR 

JNZ 

XRA 

STC 

POP 

RET 

IN 
ORA 
POP 
RET 



B 

CNCTL 

TXBE 

RI05 

A.TTYADV 

CNCTL 

B,40 

DELAY 

B 

RI07 

A,TTYSTP 

CNCTL 

B,250 

CONST 

RBR 

RI15 

DELAY 

B 

RI10 

A 

B 



CNIN 

A 

B 



SAVE BC 

READ IN USART STATUS 

CHECK FOR TRANSMITTER BUFFER EMPTY 

TRY AGAIN IF NOT EMPTY 

; ADVANCE THE TAPE 
OUTPUT THE ADVANCE COMMAND 
INITIALIZE TIMER FOR 40 MS. 

DELAY FOR 1 MILLISECOND 

DECREMENT TIMER 

JUMP IF TIMER NOT EXPIRED 

; STOP THE READER COMMAND 
OUTPUT STOP COMMAND 
INITIALIZE TIMER FOR 250 MS. 

INPUT READER STATUS 

CHECK FOR RECEIVER BUFFER READY 

YES - DATA IS READY 

DELAY 1 MS 

DECREMENT TIMER 

JUMP IF TIMER NOT EXPIRED 

ZERO A 

SET CARRY INDICATING EOF 

RESTORE BC 

RETURN TO CALLING ROUTINE 

INPUT DATA CHARACTER 

CLEAR CARRY 

RESTORE BC 

RETURN TO CALLING ROUTINE 



FUNCTION* RICH 

INPUTS* NONE 

OUTPUTS* A - ZERO, CARRY - 1 IF END OF FILE 

A - CHARACTER, CARRY - IF VALID CHARACTER 
CALLS* RI 
DESTROYS* A,F/F'S 
DESCRIPTION* RICH TESTS FOR AN END OF FILE CONDITION. 



RICH: 



CALL 


RI • 


JC 


ERROR 


AN I 


PRTY0 


RET 





READ A CHARACTER FROM TAPE 
JUMP IF READER TIMEOUT ERROR 
REMOVE PARITY BIT 
RETURN TO CALLING ROUTINE 
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LOC OBJ 



06FC 


F3 


06FD 


31B77F 


0700 


D.1 


070] 


CI 


0702 


2AC17F 


0705 


F9 


0706 


2ABF7F 


0709 


E5 


070A 


2ABB7F 


070D 


E5 


070E 


2ABD7F 


0711 


A7 


0712 


CA2307 


0715 


3E54 


0717 


D3DF 


0719 


3E10 


071B 


30 


071C 


3E0F 


07 IE 


D3DD 


0720 


3E0B 


072? 


30 ' 


0723 


Fl 


0724 


FB 


0725 


C9 



SEO 

1919 

1920 

1921 

1922 

1923 

1924 

1925 

1926 

1927 

1928 

1929 

1930 

1931 

1932 

1933 

1934 

1935 

1936 

1937 

1938 

1939 

1940 

1941 

1942 

1943 

1944 

1945 

1946 

1947 

1948 

1949 

1950 

1951 

1952 

1953 

1954 

1955 

1956 

1957 

1958 

1959 

I960 

1961 

1962 

1963 

1964 

1965 

1966 

J967 

1968 

1969 

1970 

1971 

1972 

1973 



SOURCE STATEMENT 



***************************************************************** 



FUNCTION* RSTTF 

INPUTS* A = 0, NOT SINGLE STEP EXECUTION 
A = 0FFH, SINGLE STEP EXECUTION 

OUTPUTS* NONE 

CALLS* NOTHING 

DESTROYS* A,B,C,D,E,H,L,F/F'S 

DESCRIPTION* RSTTF RESTORES ALL CPU REGISTER, FLIP/FLOPS, STACK 
POINTER AND PROGRAM COUNTER FROM THEIR RESPECTIVE 
SAVE LOCATIONS IN MEMORY. THE ROUTINE THEN TRANSFERS 
CONTROL TO THE LOCATION SPECIFIED BY THE PROGRAM 
COUNTER (I.E. THE RESTORED VALUE). THE ROUTINE 
EXITS WITH THE INTERRUPTS ENABLED. 



RSTTF: 



DISABLE INTERRUPTS 
SP,MSTAK ; SET MONITOR STACK POINTER TO START 
/OF STACK 
START ALSO END OF REGISTER SAVE AREA 

RESTORE USER STACK POINTER 



GET A,F/F'S 

SAVE THEM 

RESTORE HL REG 

CHECK FOR SINGLE STEP 

NO, DONE 

STOP TIMER 

SEND COMMAND 

RESET 7.5 INTERRUPT 

SEND IT 

COUNT WILL INTERRUPT ON NEXT INSTRUCTION 

SET TIME VALUE 

ENABLE 7.5 

NOW IT STARTS 

RESTORE A,F/F'S 

ENABLE ALL (5) INTERRUPTS. 

JUMP TO RESTORED PC LOCATION 



***************************************************************** 



FUNCTION* SRET 

INPUTS* NONE 

OUTPUTS* CARRY =1 

CALLS* NOTHING 

DESTROYS* CARRY 

DESCRIPTION^ SRET IS JUMPED TO BY ROUTINES WISHING TO RETURN SUCCESS. 



RST05: 



DI 


r 


LXI 


SP,MSTAK 


POP 


D ; 


POP 


B 


LHLD 


SSAVE 


SPHL 




LHLD 


PSAVE 


PUSH 


H 


LHLD 


FSAVE ; 


PUSH 


H 


LHLD 


LSAVE ; 


ANA 


A 


JZ 


RST0 5 


MVI 


A,STM1 ; 


OUT 


TMCP 


MVI 


A,TMRST ; 


SIM 




MVI 


A,NEXCT ; 


OUT 


CTR 1 


MVI 


A,TMENB ; 


SIM 




POP 


PSW ; 


EI 




RET 
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LOC OBJ 



SEQ 



SOURCE STATEMENT 



0726 37 

0727 C9 



0728 3AC37F 

072B B7 

072C C0 

072D 0E00 

072F CD3307 

0732 C9 



0733 D5 

0734 El 

0735 79 

0736 E60F 

0738 4F 

0739 3AC37F 
073C B7 
073D C246B7 



1974 
1975 
1976 
1977 
1978 
1979 
1980 
198J 
1982 
1983 
1984 
1985 
1986 
1987 
1988 
1989 
1990 
1991 
1992 
1993 
1994 
1995 
1996 
1997 
1998 
1999 
2000 
2001 
2002 
2003 
2004 
2005 
2006 
2007 
2008 
2009 
2010 
2011 
2012 
2013 
2014 
2015 
2016 
2017 
2018 
2019 
2020 
2021 
2022 
2023 
2024 
2025 
2026 
2027 
2028 



SRET: 



STC 
RET 



SRET SETS THE CARRY TRUE AND THEN RETURNS TO THE 
CALLER OF THE ROUTINE INVOKING SRET. 



SET CARRY TRUE 
RETURN APPROPRIATELY 



***************************************************************** 



FUNCTION* STHF0 

INPUTS* DE - 16 BIT ADDRESS OF BYTE TO BE STORED INTO 

OUTPUTS* NONE 

CALLS* NOTHING 

DESTROYS* A,B,C,H,L,F/F'S 

DESCRIPTION* STHF0 CHECKS THE HALF BYTE FLAG IN TEMP TO SEE IF 
IT IS SET TO LOWER. IF SO, STHF0 STORES A TO 
PAD OUT THE LOWER HALF OF THE ADDRESSED BYTE 
OTHERWISE, THE ROUTINE TAKES NO ACTION. 



STHFP: 



LDA 


TEMP 


ORA 


A 


RNZ 




MVI 


C,0 


CALL 


STHLF 


RET 





GET HALF BYTE FLAG 

SET F/F'S 

IF SET TO UPPER, DON'T DO ANYTHING 

ELSE, WANT TO STORE THE VALUE 

DO IT 



***************************************************************** 



FUNCTION* STHLF 

INPUTS* C - 4 BIT VALUE TO BE STORED IN HALF BYTE 

DE - 16 BIT ADDRESS OF BYTE TO BE STORED INTO 

OUTPUTS* NONE 

CALLS* NOTHING 

DESTROYS* AjBjCHjLjF/F'S 

DESCRIPTION* STHLF TAKES THE 4 BIT VALUE IN C AND STORES IT IN 
HALF OF THE BYTE ADDRESSED BY REGISTERS DE . THE 
HALF BYTE USED (EITHER UPPER OR LOWER) IS DENOTED 
BY THE VALUE OF THE FLAG IN TEMP. STHLF ASSUMES 
THAT THIS FLAG HAS BEEN PREVIOUSLY SET 
(NOMINALLY BY ICMD) . 

STHLF: 



MOVE ADDRESS OF BYTE INTO HL 

GET VALUE 

FORCE TO 4 BIT LENGTH 

PUT VALUE BACK 

GET HALF BYTE FLAG 

CHECK FOR LOWER HALF 

BRANCH IF NOT 



PUSH 


D 


POP 


H 


MOV 


A,C 


AN I 


LNIB 


MOV 


C,A 


LDA 


TEMP 


ORA 


A 


JNZ 


;STH05 
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0740 7E 

0741 E6F0 

0743 Bl 

0744 77 
P745 C9 

0746 7E 

0747 E60F 

0749 47 
074A 79 
074B 0F 
074C 0F 
074D 0F 
074E 0F 
074F B0 

0750 77 

0751 C9 



0752 


79 


0753 


FE30 


0755 


FA3305 


0758 


FE39 


075A 


FA2607 


075D 


CA2607 


0760 


FE41 


0762 


FA? 305 


0765 


FE47 


0767 


F23305 


076A 


C32607 



SEQ 

2029 
2030 
2031 
2032 
2033 
2034 
2035 
2036 
2037 
2038 
2039 
204P 
2041 
2042 
2043 
2044 
2045 
2046 
2047 
2048 
2049 
2050 
2051 
2052 
2053 
2054 
2055 
2056 
2057 
2058 
2059 
2060 
2061 
2062 
2063 
2064 
2065 
2066 
206"7 
2068 
2069 
2070 
2071 
2072 
2073 
2074 
2075 
2076 
2077 
2078 
2079 
2080 
2081 
2082 
2083 



SOURCE STATEMENT 



STH05: 



ELSE, GET BYTE 
CLEAR LOWER 4 BITS 
OR IN VALUE 
PUT BYTE BACK 



IF UPPER HALF, GET BYTE 
CLEAR UPPER 4 BITS 
SAVE BYTE IN B 
GET VALUE 



ALIGN TO UPPER 4 BITS 

OR IN ORIGINAL LOWER 4 BITS 

PUT NEW CONFIGURATION BACK 



***************************************************************** 



FUNCTION* VALDG 

INPUTS* C - ASCII CHARACTER 

OUTPUTS* CARRY - 1 IF CHARACTER REPRESENTS VALID HEX DIGIT 

- OTHERWISE 
CALLS* NOTHING 
DESTROYS* A,F/F'S 
DESCRIPTION* VALDG RETURNS SUCCESS IF ITS INPUT ARGUMENT IS 

AN ASCII CHARACTER REPRESENTING A VALID HEX DIGIT 

(0-9, A-F), AND FAILURE OTHERWISE. 



MOV 


A,M 


ANI 


UNIB 


ORA 


C 


MOV 


M,A 


RET 




MOV 


A,M 


ANI 


LNIB 


MOV 


B,A 


MOV 


A,C 


RRC 




RRC 




RRC 




RRC 




ORA 


B. 


MOV 


M,A 


RET 





VALDG : 



MOV 

CPI 

JM 

CPI 

JM 

JZ 

CPI 

JM 

CPI 

JP 

JMP 



A,C 
'0' 
FRET 
•9' 
SRET 
SRET 
■A' 
FRET 
*G' 
FRET 
SRET 



TEST CHARACTER AGAINST '0' 

IF ASCII CODE LESS, CANNOT BE VALID DIGIT 

ELSE, SEE IF IN RANGE , , -'9' 

CODE BETWEEN '0' AND '9' 

CODE EQUAL '9' 

NOT A DIGIT - TRY FOR A LETTER 

NC - CODE BETWEEN '9' AND 'A' 

NO - CODE GREATER THAN ' F' 

OKAY - CODE IS 'A' TO 'F', INCLUSIVE 



********************************************************************** 



FUNCTION* VALDL 

INPUTS* C - CHARACTER 

OUTPUTS* CARRY - ] IF INPUT ARGUMENT VALID DELIMTER 

- OTHERWISE 
CALLS* NOTHING 
DESTROYS* A,F/F'S 
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LOC OBJ 



076D 


79 


076E 


FE2C 


0770 


CA2607 


0773 


FE0D 


0775 


CA2607 


0778 


FE0A 


077A 


CA2607 


077D 


FE20 


077F 


CA2607 


0782 


C33305 



0785 0D 

0786 38302F33 
078A 30204D4F 
078E 4E49544F 
0792 522C2056 
0796 312E32 
0799 0D 



SEQ 

2084 
2085 
2086 
2087 
2088 
2089 
2090 
2091 
2092 
2093 
2094 
2095 
2096 
2097 
2098 
2099 
2100 
2101 
2102 
2103 
2104 
2105 
2106 
2107 
2108 
2109 
2110 
2111 



SOURCE STATEMENT 

DESCRIPTION* VALDL RETURNS SUCCESS IF ITS INPUT ARGUMENT IS A VALID 
DELIMITER CHARACTER (SPACE, COMMA, CARRIAGE RETURN, 
AND LINE FEED) FAILURE OTHERWISE. 

VALDL: 

MOV A,C ; 

CHECK FOR COMMA 

CHECK FOR CARRIAGE RETURN 

CHECK FOR LINE FEED 

CHECK FOR SPACE 

ERROR IF NONE OF THE ABOVE 

************************************************************** 

MONITOR TABLES 
***************************************************************** 



MOV 


A,C 


CPI 


i i 


JZ 


SRET 


CPI 


CR 


JZ 


SRET 


CPI 


LF 


JZ 


SRET 


CPI 


i t 


JZ 


SRET 


JMP 


FRET 



SGNON: 



DB 



; SIGNON MESSAGE 
CR, '30/30 MONITOR, V1.2',CR 



0015 




2112 


LSGNON 


EQU 


$-SGNON 


■ LENGTH OF SIGNON MESSAGE 








2113 


/ 




















23 14 


JPTB: 
















079A 


0000 


2115 




DW 





• BREAK 1 


ADDRESS SAVE 




079C 


0000 


2J16 




DW 





• BREAK 2 


ADDRESS SAVE 




079E 


0800 


2117 




DW 


GO 


• RST 


2-7 


SERVICE ROUTINE 




07A0 


E003 


2118 




DW 


INTIN 


JUMP TO 


SERVICE ROUTINE FOR TRAP 




07A2 


5904 


2119 




DW 


STEPIN 





FOR 


LEVEL 


7.5 




07A4 


E003 


2120 




DW 


INTIN 


JUMP TO 


SERVICE ROUTINE FOR LEVEL 


6.5 


07A6 


E003 


212J 




DW 


INTIN 





FOR 


LEVEL 


5.5 




07A8 


0J04 


2122 




DW 


INTIN9 , 





FOR 


LEVEL 







07AA 


0104 


2123 




DW 


INTIN9 , 





FOR 


LEVEL 


1 




7AC 


0104 


2124 




DW 


INTIN9 , 





FOR 


LEVEL 


2 




07AE 


0104 


2125 




DW 


INTIN9 , 





FOR 


LEVEL 


3 




07B0 


0104 


2126 




DW 


INTIN9 , 





FOR 


LEVEL 


4 




07B2 


0104 


2127 




DW 


INTIN9 , 





FOR 


LEVEL 


5 




07B4 


0104 


2128 




DW 


INTIN9 , 





FOR 


LEVEL 


6 




07B6 


0104 


2129 

2130 


? 


DW 


INTIN9 





FOR 


LEVEL 


7 




000F 




2131 


JPLG 


EQU 


(S-JPTB)/ 


'2 











2132 
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LOG OBJ 



SEQ 



SOURCE STATEMENT 



07B8 


0000 


07BA 


8502 


07BC 


6B0 3 


07BE 


C802 


07C0 


6502 


07C2 


1F02 


eic* 


AB01 


07C6 


7F0] 


07C8 


8D02 


07CA 


1603 


07CC 


57 


07CD 


52 


07CE 


44 


07CF 


47 


7D0 


49 


7D7 


4D 


07D2 


5? 


7D3 


58 


7D4 


IE 


0009 





07D5 4 1 
07D6 BC 
07D7 00 
0003 
7D8 4 2 
7D9 BA 
07DA 00 
07DB 4 3 
07DC B9 
07DD 00 
7DE 4 4 
07DF B8 
07E0 00 
07E1 45 
07E2 B7 
07E3 00 
07E1 46 
07E5 BB 
07E6 00 
07E7 48 
07E8 BE 
07E9 00 
07EA 4C 
07EB BD 
07EC 00 
07ED 4D 
07EE BE 
07EF 01 



2133 
2134 
2135 
2136 
2137 
2138 
2.139 
2140 
2141 
2.142 
21.43 
2144 
2145 
2145 
2147 
21 48 
2149 
2150 
215.1 
2152 
2153 
2154 
2.155 
2156 
2157 
2158 
2159 
2160 
2161 
2162 
216 3 
21S4 
2165 
2166 
2167 
216 8 
2169 
2170 
2171 
2172 
2173 
2174 
2175 
2176 
2177 
2178 
2179 
2180 
218.1 
2182 
2183 
2184 
2185 
218 6 
21.87 



CADR: 



CTAB: 



NCMDS 



RTAB: 



RTABS 



DB 

DB 

DB 

EQU 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DB 

DE 



DW 





DW 


NCMD 


DW 


XCMD ; 


DW 


SCMD 


DW 


MCMD ; 


DW 


ICMD 


DW 


GCMD 


DW 


DCMD 


DW 


RCMD ; 


DW 


WCMD 


DB 


' W ' ; 


DB 


' R ' 


DB 


■D' 


DB 


'G' 


DB 


' I' 


DB 


•M' ; 


DB 


'S' 


DB 


■X' 


DB 


•N' 


EQU 


*-CTAB 



TABLE OF ADDRESSES OF COMMAND ROUTINES 
DUMMY 



TABLE OF VALID COMMAND CHARACTERS 



NUMBER OF VALID COMMANDS 



; TABLE OF REGISTER INFORMATION 
'A' ; REGISTER IDENTIFIER 
LOW(ASAVE) ; ADDRESS OF REGISTER SAVE LOCATION 





S-RTAB 

'B' 

LOW(BSAVE) 



'C ' 

LOW(CSAVE) 

f 
■D' 

LOW(DSAVE) 



LOWfESAVE) 

•F 1 

LOW(FSAVE) 



■H' 

LOW(HSAVE) 

P 

'L ' 

LOW(LSAVE) 



'M' ; 

LOW(HSAVE) 

1 ; 



LENGTH FLAG - 0=8 BITS, 1=1 S BITS 
SIZE OF AN ENTRY IN THIS TABLE 
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LOC OBJ 

07F0 50 
07F1 C0 
07F2 01 
07F3 53 
07F4 C2 
07F5 01 
07F6 00 
07F7 00 



7FB7 
7FB7 
0001 
0001 
0001 
0001 
0001 
0001 
0001 
0001 
0002 
0002 
0001 

P001 
0003 
0001 
0003 
0004 
0004 
0004 



SEQ 

2188 
2.189 
2190 
2191 
2192 
2.19 3 
2194 
2195 
2196 
2197 
2198 
2199 
2200 
2201 
2202 
2203 
2204 
2205 
2206 
2207 
2208 
2209 
2210 
2211 
2212 
2213 
2214 
2215 
2216 
2217 
2218 
2219 
2220 
2221 
2222 
2223 
2224 
2225 
2226 
2227 
2228 
2229 
2230 
2231 
2232 
2233 
2234 
2235 
2236 
2237 
2238 
2239 
2240 
2241 
2242 



SOURCE STATEMENT 



DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 



.p. 

LOW(PSAVE-H) ; 

1 

'S' ; 

LOW(SSAVE+l) ; 

1 

; END OF TABLE MARKERS 

9 



********************************************************************** 



MSTAK 
ESAVE 

DSAVE 

CSAVE 

BSAVE 

FSAVE 

ASAVE 

LSAVE 

HSAVE 

PSAVE 

SSAVE 

TEMP: 

RAMTB: 
BK1BY: 

BK 1 AD : 

BK2BY: 

BK2AD: 

OTHER: 

TRAP: 

USINT: 



ORG 
EQU 

DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 

DS 
DS 
DS 
DS 
DS 
DS 
DS 



REGS 

$ 

1 

1 

1 

1 

1 

1 

1 

1 

2 

2 

1 

1 
3 
1 
3 
a 
4 
& 



ORG TO REGISTER SAVE - STACK GOES IN HERE 

START OF MONITOR STACK 

E REGISTER SAVE LOCATION 

D REGISTER SAVE LOCATION 

C REGISTER SAVE LOCATION 

B REGISTER SAVE LOCATION 

FLAGS SAVE LOCATION 

A REGISTER SAVE LOCATION 

L REGISTER SAVE LOCATION 

H REGISTER SAVE LOCATION 

PGM COUNTER SAVE LOCATION 

USER STACK POINTER SAVE LOCATION 

TEMPORARY MONITOR CELL 

BYTE SAVE FOR BREAK 1 

ADDRESS SAVE FOR BREAK 1 

BYTE SAVE FOR BREAK 2 

ADDRESS SAVE FOR BREAK 2 

THIS WILL ALLOW USER TO CHANGE RST 2-7 

TRAP INTERRUPT 

ALSO SPECIAL FOR 7.5 FOR NEXT COMMAND 
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LOC OBJ 



SEQ 



SOURCE STATEMENT 



0004 

0020 



2243 


USIN2: 




2244 




DS 


2245 


USIN1: 




2246 




DS 


2247 




DS 


2248 




END 



A 

32 



; I/O INTERRUPT 6.5 

; I/O INTERRUPT 5.5 

; INTERRUPT VECTOR RAM TABLE FOR LEVELS 0-7 



PUBLIC SYMBOLS 



EXTERNAL SYMBOLS 



USER SYMBOLS 






































ADRD 


A 


0493 


ADROUT 


A 


049C 


ASAVE 


A 


7FBC 


B110 


A 


00AF 


B1200 


A 


0010 


B150 


A 


0080 


B2400 


A 


0008 


B300 


A 


0040 


B4800 


A 


0004 


B600 


A 


0020 


B9600 


A 


0002 


BK1AD 


A 


7FC5 


BK1BY 


A 


7FC4 


. BK2AD 


A 


7FC9 


BK2BY 


A 


7FC8 


BREAK 


A 


04AA 


BRS07 


A 


0084 


BRS08 


A 


0097 


BRS15 


A 


00B4 


BRS20 


A 


00BD 


BRS25 


A 


00C6 


BRS3 


A 


00D2 


BRS35 


A 


00E5 


BRSEL 


A 


0074 


BSAVE 


A 


7FBA 


BYTE 


A 


04BD 


C1M0 


A 


0070 


C2M3 


A 


00B6, 

005^ 


CADR 


A 


E7B8 


CH12 


A 


0080 


CH15 


A 


0078 


CH24 


A 


0078 


CH30 


A 


0066 


CH48 


A 


0066 


CH60 


A 


CH96 


A 


0055 


CI 


A 


04D8 


CMD 


A 


0027 


CNCTL 


A 


00ED 


CNIN 


A 


0EC 


CNOUT 


A 


00EC 


CNVBN 


A 


04E 


CO 


A 


04EB 


CONST 


A 


•00ED 


CPYRT 


A 


004C 


CR 


A 


000D 


CROUT 


A 


04F6 


CSAVE 


A 


7FBS 


CTAB 


A 


07CC- 


CTR1 


A 


00DD 


CTR2 


A 


0DE 


DATA 


A 


8000 


DCM0 5 


A 


0186 


DCM10 


A 


0189 


DCMD 


A 


017F 


DELI 


A 


04FF 


DELAY 


A 


04FC 


DSAVE 


A 


7FB8 


ECH05 


A 


0510 


ECH10 


A 


0523 


ECHO 


A 


0507 


EOIC 


A 


00 2 


ERROR 


A 


0525 


ESAVE 


A 


7FB7 


ESC 


A 


001B 


EXIT 


A 


052A 


FINTN 


A 


0418 


FND20 


A 


0429 


FNDI 


A 


0421 


FRET 


A 


0533 


FSAVE 


A 


7FBB 


GCM03 


A 


01B8 


GCM05 


A 


01EA 


GCM10 


A 


01F6 


GCM20 


A 


01F9 


GCM30 


A 


02 0D 


GCM40 


A 


0215 


GCMD 


A 


01AB 


GETCH 


A 


0536 


GETCM 


A 


0154 


GETHX 


A 


5 3D 


GETNM 


A 


0571 


GHX05 


A 


0543 


GHX10 


A 


055B 


GNM05 


A 


057R 


GNM10 


A 


058D 


GNM15 


A 


059B 


GNM20 


A 


05A0 


GNM25 


A 


05AB 


GNM30 


A 


05AF 


GO 


A 


0008 


GOBK1 


A 


04 2F 


GOBK10 


A 


043B 


GOBK2 


A 


0447 


GTC05 


A 


0169 


GTC10 


A 


0175 


HCHAR 


A 


000F 


HIL05 


A 


05C5 


HILO 


A 


05B6 


HREGS 


A 


007F 


HSAVE 


A 


7FBE 


ICCP 


A 


00DA 


ICM05 


A 


022A 


ICM10 


A 


0251 


ICM20 


A 


0259 


ICM25 


A 


025F 


ICMD 


A 


021F 


ICW1 


A 


00F6 


ICW2 


A 


007F 


IICR 


A 


010E 


IICR5 


A 


0110 


IMASK 


A 


0000 


INTIN 


A 


03E0 


INTIN9 


A 


0401 


INUST 


A 


005F 


INVRT 


A 


00FF 


JMCHD 


A 


00C3 


JPLG 


A 


000F 


JPTB 


A 


079A 


LE05 


A 


05CA 


LEAD 


A 


05C8 


LF 


A 


000A 


LLOW 


A 


0040 


LNIB 


A 


000F 


LOK 


A 


0000 


LOK15 


A 


0131 


LOK20 


A 


0142 


LSAVE 


A 


7FBD 


LSGNON 


A 


0015 


MCM05 


A 


026D 


MCMD 


A 


0265 


MODE 


A 


004F 


MODE 2 


A 


00CF 


MSKPT 


A 


0PDB 


MSTAK 


A 


7FB7 


NCMD 


A 


0285 


NCMDS 


A 


0009 


NEWLN 


A 


P00F 


NEXCT 


A 


000F 


NMOUT 


A 


5D/' 


NXT05 


A 


05FB 


NXTIN 


A 


05E7 


OCW3 


A 


000B 


ONEMS 


A 


008B 


OTHER 


A 


7FCC 


PADR 


A 


060D 


PBYTE 


A 


06] 


PEOF 


A 


062D 


PEOL 


A 


064B 


PO 


A 


04EB 


PRTY0 


A 


007F 


PRVAL 


A 


0656 


PSAVE 


A 


7FBF 


RAMTB 


A 


7FC\ 
0688 


RBR 


A 


0002 


RCM05 


A 


0299 


RCM10 


A 


02B6 


RCMD 


A 


028D 


REG05 


A 


0663 


REG 10 


A 


066D 


REG 15 


A 


REGDS 


A 


0660 


REGS 


A 


7FB7 


REGSV 


A 


0691 


RESURT 


A 


0037 


RGA05 


A 


06B0 


RGA10 


A 


06BD 


RGADR 


A 


06AA 


RI 


A 


06C1 


RI05 


A 


06C? 


RI07 


A 


06CF 


RI10 


A 


06DC 


RI15 


A 


06EE 


RICH 


A 


06F3 


RST05 


A 


0723 


RST1 


A 


00CF 


RSTTF 


A 


06FC 


RSTUST 


A 


0040 


RTAB 


A 


07D5 


RTABS 


A 


0003 


SCM03 


A 


02D1 


SCM0 5 


A 


02D3 


SCM10 


A 


02DE 


SCM20 


A 


02EE 


SCM25 


A 


030D 


SCMD 


A 


P2C8 


SGNON 


A 


0785 


SRET 


A 


0726 


SSAVE 


A 


7FC1 


STEPIN 


A 


0459 


STH05 


A 


0746 


STHF0 


A 


0728 


STHLF 


A 


0733 


STM1 


A 


0054 


STP05 


A 


047F 


STP10 


A 


0482 


TEMP 


A 


7FC3 


TERM 


A 


001B 


TMCP 


A 


00DF 


TMDIS 


A 


000F 


TMENB 


A 


000B 


TMRST 


A 


0010 


TRAP 


A 


7FD0 


TRDY 


A 


0001 


TTYADV 


A 


0037 


TTYSTP 


A 


0035 


TXBE 


A 


0004 


UN IB 


A 


00F0 


UPPER 


A 


00FF 


USAREA 


A 


7F80 


USECI 


A 


0040 


USECO 


A 


004 3 


USEPO 


A 


0049 


USERI 


A 


0046 


USIN1 


A 


7FDC 


USIN2 


A 


7FD8 


USINT 


A 


7FD4 


VALDG 


A 


0752 


VALDL 


A 


076D 


WCM0 5 


A 


0320 


WCM10 


A 


0335 


WCM15 


A 


0338 


WCM20 


A 


0350 


WCM2 5 


A 


0365 


WCMD 


A 


0316 


XCM05 


A 


037D 


XCM10 


A 


038C 


XCM15 


A 


0399 


XCM20 


A 


03B7 


XCM25 


A 


03CE 


XCM30 


A 


03CF 


XCM35 


A 


3D7 


XCMD 


A 


036B 
































ASSEMBLY 


COMPLETE, NO 1 


ERRORS 

































Intel 



© SYSTEM 80/30 USER'S GUIDE 

900710A 



REQUEST FOR READER'S COMMENTS 

The Microcomputer Division Technical Publications Department attempts to provide documents that meet the needs of all 
Intel product users. This form lets you participate directly in the documentation process. 

Please restrict your comments to the usability, accuracy, readability, organization, and completeness of this document. 

1. Please specify by page any errors you found in this manual. 



2. Does the document cover the information you expected or required? Please make suggestions for improvement. 



3. Is this the right type of document for your needs? Is it at the right level? What other types of documents are needed? 



4. Did you have any difficulty understanding descriptions or wording? Where? 



5. Please rate this document on a scale of 1 to 10 with 10 being the best rating.. 



NAME DATE . 

TITLE 



COMPANY NAME/DEPARTMENT. 
ADDRESS 



CITY STATE ZIP CODE 



Please check here if you require a written reply. □ 



WE'D LIKE YOUR COMMENTS . . . 

This document is one of a series describing Intel products. Your comments on the back of this form will help 
us produce better manuals. Each reply will be carefully reviewed by the responsible person. All comments and 
suggestions become the property of Intel Corporation. 



BUSINESS REPLY MAIL 

No Postage Stamp Necessary if Mailed in U.S.A. 



First Class 
Permit No. 1040 
Santa Clara, CA 



Postage will be paid by: 

Intel Corporation 

3065 Bowers Avenue 
Santa Clara, CA 95051 



Attention: MCD Technical Publications 



iny 



INTEL CORPORATION, 3065 Bowers Avenue, Santa Clara, CA 95051 (408) 987-8080 

Printed in U.S.A. 



